Pascal на работу в совместное предприятие приглашаются специалисты, возраст которых не превышает 50 лет. определи, будет ли принят на работу человек, возраст которого n лет?
Const age = 50; var n : integer; begin write ('Введите возраст: '); readln (n); if n<age then write ('Будет принят') else write ('Не будет принят'); end.
var
n : integer;
begin
write ('Введите возраст: ');
readln (n);
if n<age then write ('Будет принят') else write ('Не будет принят');
end.
var N:integer;
begin
введите возраст человека в поле ниже');
readln(N);
if N<=35 then writeln('Принят')
else
writeln('Не принят');
end.