76

помогите пожалуйста, очень-очень нужно это решение! ЗАДАН МАССИВ, СОСТОЯЩИЙ ИЗ N…

21 февраля 2023

помогите пожалуйста, очень-очень нужно это решение! ЗАДАН МАССИВ, СОСТОЯЩИЙ ИЗ N ЭЕЛЕМЕНТОВ. НАЙТИ СУММУ ЕГО ПОЛОЖИТЕЛЬНЫХЭЛЕМЕНТОВ.

категория: информатика



99

var a: array[1… 1000] of integer; i,s,n: integer; beginrandomize; readln (n); s: =0; for i: =1 to n do begina[i]: =random (200) -200; if (a[i]>0) then s: =s+a[i]; end; writeln (s); end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...