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

Ответы 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.

    • Автор:

      angus
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years