Войти Регистрация Спроси ai-bota

Знайти суму всіх парних чисел від 1 до n. паскаль

Ответ:

Faskarvdbdbc

03.10.2020 11:21

//PascalABC.NET 3.1 сборка 1200
begin
writeln(range(1, ReadInteger('n =')).Where(x -> x mod 2 = 0).Aggregate((s, x)-> x + s));
end.

0,0(0 оценок)

Популярные вопросы: Информатика

Kostia06

29.10.2021 03:34

Как закончите открываем программу и пишем переменную # создать список элементов A=[] n=10 i=0 while i a: print(t) n=n+1 t=1+1/n print( )...

Belay28

09.04.2020 19:03

Асположите в правильном порядке алгоритм решения следующей задачи: Дана длина ребра куба а. Найти объем куба V = a*a*a и площадь его поверхности S = 6*a*a. Примечание....

Nonna7229

06.03.2022 17:45

Транслятор қандай төрт міндетті шеше алады?...

Summerween

21.03.2020 03:14

Угадайте игру по скриншоту...

юлияиванова1

28.09.2020 08:14

Кратные 3,но не кратные 2 и 5! Задача, как всегда, на програмированию.Решаю в Паскале! ...

милка1523

16.12.2021 14:37

Блок-схемаға қатысы жоқ блоктардыанықта.Дұрыс жауап саны: 2...

WowRenka

13.06.2020 08:02

Гироскопический датчик Найди ошибку в программном коде.неверно указаны порты больших сервомоторовневерно указаны порты среднего сервомотораневерно определен датчикневерно...

nikita71140

10.12.2022 15:11

IDE ортасымен танысу Шығару операторы жазылғанпрограммалау тілін анықта.Cout Hello! ;Жауаптың дұрыс нұсқасын анықта....

alina2000klimenko

14.02.2023 21:08

Почему русские хакеры самые сильные...

Жанночка305

14.02.2022 09:31

по информатике я должен БЫТЬ ЛУЧШЕ ВСЕХ В КЛАССЕ!Эссе на тему любимая игра(моя любимая игра это World War Heroes)...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку