Составить программу на нахождение макимального значения в массиве чисел.

Составить программу на нахождение макимального значения в массиве чисел.
Гость
Ответ(ы) на вопрос:
Гость
program mas; const N=(количество чисел в массиве); var a:array[1..N] of integer;       i,max:integer; begin for i:1 to N do readln(A[i]);   max:=0; for i:=1 to N do   if (A[i]>max) or (max=0) then max:=A[i]; writeln(max); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы