Question

На яклассе, выполнить информатика пишите в лс выведи на экран большее из двух данных чисел. запиши программу на языке паскаль, выведи ответ на экран, если 1,74821 и 2,7111.

Answer 1

Var a,b:real;beginwriteln('введите первое число:');readln(a);writeln('введите второе число:');readln(b);if(a>b) then writeln('первое число больше второго')elsewriteln('второе число больше первого');end.

Answer 2

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