Найти максимальное из двух чисел задание по информатике

Question

Информатика

Ларуня

23 июня, 14:58

Найти максимальное из двух чисел задание по информатике

+1

Ответы (1)

Знаете ответ на вопрос?

Карион · Answer 1

Program prog;

uses crt;

var a, b: real;

begin

write ('Введите число а = ') ;

readln (a) ;

write ('Введите число b = ') ;

readln (b) ;

writeln;

if a>b then writeln ('Максимальное число а = ', a:0:3) ;

if a
end.