28.05.2008, 13:16
общий
это ответ
Здравствуйте, Sanq4!
Сначала считаем что максимальный элемент первый, затем если найдеться элемент больше первого, то присваиваем ему значение max.
Приложение:
uses crt;const n=10;type mas=array[1..n] of integer;var i:integer;m:mas; max,min:integer;beginrandomize;For i:=1 to n dom[i]:=random(200)-100;max:=0;min:=0;max:=m[i];for i:=1 to n doif M[i+1]>max thenmax:=m[i+1];writeln(‘max:=‘,max);writeln;min:=m[i];for i:=1 to n doif M[i]<min thenmin:=M[i];writeln(‘min=‘,min);writeln;for i:=1 to n dowrite(m[i]:5);readln;end.