Войти
Регистрация
Спроси ai-bota
25424446645
29.10.2021 18:11
Вфайле in.txt записаны 10 чисел. найти сумму чисел, которые не меньше 5. результат записать в файл out.txt.
Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
AikolNur
07.03.2021 16:42
Нужно сделать сравнение Windows 7,8,10,Vista, по любым критериям...
двоишник54
15.08.2022 06:33
Задан одномерный массив А, содержащий N элементов. Укажите, что будет определено в результате работы следующего фрагмента программы: k:=0; for i:=1 to N do if A[i] =0 then...
vadimbukov
07.07.2021 06:38
1. Что такое терминал? 2. Сколько терминалов эмулируется в Linux? Какие комбинации клавиш позволяют переключаться из одного терминала в другой? 3. Может ли один человек работать...
Коля1741
15.04.2021 23:01
Для произвольного одномерного массива С из 10 элементов к четным прибавить А, а из элементов с четными номерами вычесть В, где А, В вводятся с клавиатуры...
dedmoros1234567
15.08.2020 16:44
Какой логотип организации, ответственной за IP-адреса?...
guldanaramazan
11.01.2023 09:00
Какие характеристики подходят для восприятия органами осязания? сочный близкий кислый громкий мускатный (запах) мягкий тёплый ритмичный...
GgEz11134
05.02.2020 13:13
Приложения процессы Службы Быстродействие | Сеть Пользователи Иня ИД ... III 896 Vaultsvc SamSs ProtectedSto... NetTcpPorts... NetTcpActiva... NetPipeActiva... NetMsm Acti......
112811281128
25.06.2020 17:35
Сравните вычисления в калькуляторе и вычисления в Python. Проанализируйте их сходства и различия....
aiym19
16.05.2023 13:49
Решить на C++ использовать string Задача №112406. Синие и красныеДана цепочка, состоящая из синих (B) и красных (R) точек. Нужно удалить наименьшее количество синих точек...
nasstya05
06.03.2022 02:38
Определите значение переменной b после выполнения данного алгоритма: b := –5 a := 2 a := 11 – 2 * a – b b := a / 3 – 3 * b...
Ответ:
Андрей1щщщщз
07.10.2020 10:57
// 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) можно убрать
0,0
(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота