Определите максимальное время прохождения 100- метровой дистанции 12 спортсменов , если время каждого вводится с клавиатуры( информатика)

можешь написать что именно каждой строчкой находишь

for i:=1 to 12 do - цикл, тело которого повторится 12 раз writeln('Введите время участника №', i); - просит ввести время участника №[номер повторения цикла] readln(t); - считывает число, которое вводит пользователь if t>x then - если число, которое ввели, больше значения переменной x, то (x:=t;) это число кладем в переменную x.После прогона всего цикла нам остается вывести значение x, делаем мы это командой writeln('Максимальное время прохождения 100-метровой дистанции: ',x);

Если нужно написать программу на паскале, то вот:

program stometrov;

var i:integer; t,x:real;

begin

 x:=0;

 for i:=1 to 12 do

 begin

   writeln('Введите время участника №', i);

   readln(t);

   if t>x then

     x:=t;

 end;

 writeln('Максимальное время прохождения 100-метровой дистанции: ',x);

end.