Сгенерировать массив 10 на 10 в интервале от 0 до 100.вывести на экран. найти сумму каждой строки.

103

196

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

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

Kotbarsikrulit

Информатика

4,5(26 оценок)

Если будут вопросы или что-то нужно изменить пиши. const n=10; var a: array [1..n] of integer; i, s1,s2: integer; begin for i : = 1 to n do begin a[i] : = random(100); write(a[i],' '); end; for i: =1 to n do if i< (n/2) then s1: =s1+a[i] else s2: =s2+a[i]; writeln; if s1< > s2 then if s1< s2 then write (s1,'< ',s2) else write (s1,'> ',s2) else write (s1,'=',s2) end.