• Дано три числа x, y, z. Вычислить количество чисел больших 7.

Ответы 1

  • var

      x, y, z : real;

      k : byte;

    begin

      read (x, y, z);

      k := 0;

      if x > 7 then inc (k);

      if y > 7 then inc (k);

      if z > 7 then inc (k);

      writeln (k);

    end.

  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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