Question

приём на работу ведёться на конкурсной основе. условия приёма требуют 20лет стажа и возраста не более 42 лет. определите будет ли человек принят на работу

Answer 1

var age,exper,max_age,work_age:integer;

Begin

  max_age:=42;

  work_age:=20;

  read(age,exper);

  if (age<= max_age) and (exper>=20) then writeln('Da')

  else writeln ('Net')

End.