Имеются данные о количестве полных лет трех призеров спартакиады. Напишите программу выбирающую и выводящую возраст самого младшего призера.

Question

Информатика

Лука

16 февраля, 06:54

Имеются данные о количестве полных лет трех призеров спартакиады. Напишите программу выбирающую и выводящую возраст самого младшего призера.

+5

Ответы (1)

Знаете ответ?

Протасий · Answer 1

var

mas:array[1 ... 3] of integer;

i, min:integer;

begin

for i:=1 to 3 do

begin

min:=maxint;

writeln ('Введите возраст ', i,'-ого участника') ;

readln (mas[i]) ;

if mas[i]
end;

writeln (min) ;

end.