30 баллов
Из трёх данных вещественных чисел R, M, Y выбрать наибольшее и вывести его на экран. Числа R, M, Y ввести с клавиатуры с помощью оператора ввода
Паскаль
Ответы
Ответ дал:
0
var r,m,y,max:integer;
begin
readln(r);
max:= r;
readln(m);
if m > max then max:=m;
readln(y);
if y > max then max:=y;
writeln(max);
end.
Похожие вопросы
2 года назад
2 года назад
8 лет назад
9 лет назад
9 лет назад