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

Question

Информатика

Ларуня

18 января, 15:33

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

+4

Ответы (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.