Регистрация
deniskim01
24.03.2020 16:29
Информатика
Есть ответ 👍

составить программу на языке pascal для вычисления на эвм значений переменных. Вывести на экран значения исходных данных и результатов промежуточных и кончательных вычислений, сопровождая вывод именами переменных.

170
397
Посмотреть ответы 1

Ответы на вопрос:

weee2004
weee2004
4,6(14 оценок)
Var a: array[1..15] of integer; s,n,i: integer; begin for i: =1 to 15 do begin a[i]: =random(+21)-10; if a[i]> 0 then s: =s+a[i]; if a[i]< 0 then n: =n+1; end; writeln('сумма-',s,' кол-во-',n); end.

Популярно: Информатика