Pascal. написать свой возраст и возраст друга, с клавиатуры, если твой больше вывести свой возраст иначе возраст друга

Question

Информатика

Рамиль

19 апреля, 04:31

Pascal. написать свой возраст и возраст друга, с клавиатуры, если твой больше вывести свой возраст иначе возраст друга

+4

Ответы (1)

Знаете ответ?

Стевия · Answer 1

Program abc;

var a, b: integer;

begin

writeln ('Input your age: ') ;

readln (a) ;

writeln ('Input age of friend: ') ;

readln (b) ;

if (a > b) then writeln ('your age = ', a)

else writeln ('age of friend = ', b) ;

end.