Составить программу Турбо Паскаль Работающий светофор на середине экрана

174

473

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

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

аааааааа36

Информатика

4,7(76 оценок)

Этой программе, можно получать сумму как отрицательных, так и положительных чисел. var a: array[0..100] of integer; n,i,s,sum: integer; begin writeln('введите кол-во чисел, не привышающие число 100'); readln(n); dec(n); for i: =0 to n do begin writeln('введите ',i+1,' число'); readln(s); a[i]: =s; inc(sum,a[i]); end; writeln('полученный ответ: ',sum); end.