Предмет: Информатика, автор: SenyaMen

Задан рост ученика в классе.Величина роста выбирается случайным образом в интервале от 140 до 180 см.Определить порядковый номер ученика имеющего самый высокий рост.

СРОЧНО!ПОМОГИТЕ ПОЖАЛУЙСТА!

Ответы

Автор ответа: Aleks1224
0
Если учеников в классе 10.

program z1;
var
i,b,с:integer;
a:array[1..10] of integer;
begin
for i:=1 to 10 do
begin
a[i]:=random(140,180);
b:=max(b,a[i]);
If a[i]=b then
c:=i;
end;
writeln('Номер самого высокого учеика в классе: ',с);
end.
Похожие вопросы
Предмет: Химия, автор: bekaryskambarov1
Предмет: Физика, автор: fatima123456789