Ребят очень нужно решить задачу.ДАЮ 75 БАЛЛОВ + ПЕРВОМУ КТО ОТВЕТИТ ЛУЧШИЙ ЗАСЧИТАЮ. ПИШИТЕ НА PASCAL ABC!!!!
В компьютер поступают результаты соревнований по плаванью ( количество минут и секунд) для трёх спортсменов.Составьте программу, которая выводит на экран лучший результат.
В компьютер поступают результаты соревнований по плаванью ( количество минут и секунд) для трёх спортсменов.Составьте программу, которая выводит на экран лучший результат.
More Questions From This User See All
Answers & Comments
Verified answer
Varbest, m, s,i: integer;
begin
best := 10000000;
for i:= 1 to 3 do begin
write('min sec = ');
readln(m, s);
if best > m * 60 + s then best := m * 60 + s;
end;
writeln('Лучший = ', best div 60, ' min ', best mod 60, ' sec');
end.