даны 10 случ. чисел. Выбрать из них наибольшее с помощью одномерного массива.

1

Ответы и объяснения

Лучший Ответ!
2013-02-16T10:49:25+04:00

const
N=10;
var
i,k : integer;
A: array [1..N] of integer;
Begin
randomize;
for i:= 1 to N do A[i]:=random(maxint);
k:=-maxint;
for i:= 1 to N do begin
if A[i] > k then k:=A[i];
end;
writeln('Наибольшее значение: ', k);
end.