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