Question

В массиве хранится информация о росте 35 человек.Определить сколько человек имеют самый большой рост. Очень срочно!!!!! 

Answer 1

var a:array [1..35] of integer; i,max:integer;
begin
for i:=1 to 35 do
begin
a[i]:=random(100,190);
if a[i]>max then max:=a[i];
end;
writeln('Наибольший рост = ',max);
end.

Answer 2

в переменной max не задано значение, с чем тогда сравнивается а [i]??

Answer 3

max=0

Answer 4

Зачем задавать ее значение?

Answer 5

ну так и надо задать в программе перед счетчиком, что max:=0, иначе будет ошибка в программе

Answer 6

Переменная max имеет стандартное значение 0, и если мы не укажем ее значение ошибки не будет