Задать вопрос
4 февраля, 06:03

Написать программу которая подбирает спутника жизни пол мужской рост не меньше 170 см, возраст не больше 17. в программе паскаль

+2
Ответы (1)
  1. 4 февраля, 08:26
    0
    Var e: integer;

    h: real;

    m: string;

    begin

    writeln ('Введите пол');

    readln (m);

    writeln ('Введите рост (см) ');

    readln (h);

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

    readln (e);

    if m[1] = 'м') and (h >=170) and (e<=17) then

    writeln ('Спутник')

    else

    writeln ('Не спутник');

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Написать программу которая подбирает спутника жизни пол мужской рост не меньше 170 см, возраст не больше 17. в программе паскаль ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы