Выведи ** экран большее из двух данных чисел.Запиши программу ** языке Паскаль, выведи...

Question

Выведи на экран большее из двух данных чисел.

Запиши программу на языке Паскаль, выведи ответ на экран, если1,16505 и 2,3468.

Answer 1

Var num1,num2:real;
begin
write('Введите первое число: '); readln(num1);
write('Ведомое второе число: '); readln(num2);
writeln('Наибольшее число: ');
if (num1 > num2) then writeln(num1)
else writeln(num2)
end.