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

Question

Информатика

Елько

11 июня, 00:20

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

+1

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