• Введите с клавиатуры 10 натуральных чисел. Введите на экран количество двузначных чисел.

Ответы 1

  • // PascalABC.NET 3.3, сборка 1573 от 04.11.2017// Внимание! Если программа не работает, обновите версию!begin  Writeln('Кол-во двухзначных чисел равно ',      ReadSeqInteger('Введите 10 натуральных чисел:',10)      .Where(t->Abs(t).Between(10,99)).Count)end.ПримерВведите 10 натуральных чисел: 356 0 16 -3523 -62 35 123 4 -2 131Кол-во двухзначных чисел равно 3
  • Добавить свой ответ

Войти через Google

или

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

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

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