dongrigoriew20
15.08.2021 02:32

Найти сумму чисел от 1 до n, делящихся на 5 и меньших а. паскаль

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
патося37
25.09.2020 01:17
Begin
    var a := ReadInteger('a =');
    PrintLn(
        Range(1, ReadInteger('n ='))
        .Where(x -> (x mod 5 = 0) and (x < a))
        .Aggregate((s, x)-> s + x)
    );
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота