Напишите программу в Pascal

компьютер спрашивает возраст и стаж, на работу принимает если кандидат старше 25 лет и имеет стаж не менее 10 лет

Question

Информатика

Фудо

3 декабря, 13:52

Напишите программу в Pascal

компьютер спрашивает возраст и стаж, на работу принимает если кандидат старше 25 лет и имеет стаж не менее 10 лет

+5

Ответы (1)

Знаете ответ на вопрос?

Абубкер · Answer 1

var a, b:integer;

begin

writeln ('Сколько вам лет, и каков ваш стаж?') ;

Writeln ('Возраст') ;

read (a) ;

Writeln ('Стаж') ;

read (b) ;

if (a>25) and (b>10) then begin

Writeln ('Вы приняты') ;

end

else begin

writeln ('Извините, вы не приняты') ;

end;

end.

Напишите программу в Pascalкомпьютер спрашивает возраст и стаж, на работу принимает если кандидат старше 25 лет и имеет стаж не менее 10 лет

Напишите программу в Pascal

компьютер спрашивает возраст и стаж, на работу принимает если кандидат старше 25 лет и имеет стаж не менее 10 лет