• Помогите пожалуйста
    В файле in.txt записаны 10 чисел. Найти сумму чисел, которые не меньше 5. Результат записать в файл out.txt.

Ответы 2

  • Может быть, покажется странным, но это действительно полная программа. Уж такие возможности у этого языка.
    • Автор:

      callie99
    • 5 лет назад
    • 0
  • // PascalABC.NET 3.3, сборка 1590 от 03.12.2017// Внимание! Если программа не работает, обновите версию!begin  WriteAllText('out.txt',      ReadAllText('in.txt').ToIntegers.Take(10).Where(t->t>=5).Sum.ToString)end.Примечание: если чисел гарантировано 10, то .Take(10) можно убрать
    • Автор:

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

Войти через Google

или

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

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

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