Задать вопрос
28 апреля, 17:22

Напишите программу для турбо паскаля. Условие: фирма осуществляет набор сотрудников, условия приёма: требуется не менее 3 лет рабочего стажа и возраст не более 35 лет.

+2
Ответы (2)
  1. 28 апреля, 17:59
    0
    Var

    vozrast, stash:integer;

    writeln ('Сколько вам лет') ;

    readln (vozrast) ;

    writeln ('Какой у вас рабочий стаж') ;

    readln (stash) ;

    if (vozrast3) then

    writeln ('Мы берем вас на работу')

    else writeln ('Вы нам не подходите') ;

    end.
  2. 28 апреля, 19:23
    0
    Var a, b, c:real;

    begin

    writeln ('Введите Ваш рабочий стаж:') ;

    readln (a) ;

    writeln ('Введите Ваш возраст:') ;

    readln (b) ;

    if (a>=3) and (b<=35) then

    writeln ('Вы нам подходите') else

    writeln ('К сожалению, Вы нам не подходите') ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Напишите программу для турбо паскаля. Условие: фирма осуществляет набор сотрудников, условия приёма: требуется не менее 3 лет рабочего ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы