Question

Определить будет ли принят на работу сотрудник условия стаж работы больше 10 лет и возраст меньше 30 Помогите :)

Answer 1

 program Job;
var a,b,c:integer;
begin Writeln('Возраст');read(a);Writeln('Стаж');read(b);if a>29 thenc:=1;if b>9 then c:=c+1;if c=2 then writeln('Да, он будет принят')elsewriteln('Нет, он не будет принят'); 


end.