На работу на совместное предприятие приглашается специалисты не превышает 35 лет . Определить , будет ли принят на работу человек возраст которого N лет
Var a:integer; Begin Write('Ведите возраст: '); Readln(a); If (a<=35) then write('Подходит') else write('Не подходит'); end.