Найти лучший результат по бегу на 100 м трех участников паскаль пожалуйста!!!
Найти лучший результат по бегу на 100 м трех участников паскаль пожалуйста!!!
Гость
Ответ(ы) на вопрос:
Гостьvar r1,r2,r3,min:real;
begin
writeln('Введите результаты:');
readln(r1,r2,r3);
if r1 r2 then r1 := r2;
if r1 > r3 then r1 := r3;
writeln('Лучший результат = ', r1);
end.
Не нашли ответ?
Похожие вопросы