Question

Pascal

На работу в совместное предприятие приглашаются специалисты, возраст которых не превышает 50 лет. Определи, будет ли принят на работу человек, возраст которого N лет?

Answer 1

const age = 50;
var
n : integer;
begin
write ('Введите возраст: ');
readln (n);
if n<age then write ('Будет принят') else write ('Не будет принят');
end.