Написать программу которая определяет максимальное значение 2 вещественных чисел в pascal
Написать программу которая определяет максимальное значение 2 вещественных чисел в pascal
Гость
Ответ(ы) на вопрос:
Гостьprogram vewestvennoemax;
var max,a,b:real;
begin
readln(a,b);
if a>b then max:=a else max:=b;
writeln('Maksimalnoe= ',max);
end.
Не нашли ответ?
Похожие вопросы