Составить программу, которая будет вводить n чисел и искать максимальное число среди этих чисел. 1< =a[i], n< =100

206

500

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

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

тильняшка5

Информатика

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

Const n=100; var a: array[1..n] of integer; max,i: integer; begin randomize; for i: =1 to n do begin writeln(a[i]=''); readln(a[i]); end; max: =a[1]; for i: =2 to n do if a[i]> max then begin max: =a[i]; end; writeln; writeln('max=',max); readln; end.