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

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

Ответ:

ksenia112005

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 оценок)

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

gitl20042004

06.01.2020 05:07

при каких условиях данная точка принадлежит заштрихованной области...

Loliss

01.06.2021 16:57

Составить программу в python: ...

diaabd150ozrpt6

23.03.2023 06:28

Составить программу в python: ...

ruslangusen

27.07.2022 00:05

Запишите 10 тестов по информатике....

RomaDiduh

18.04.2023 22:02

Дано трехзначное число. Выведите сумму его цифр. ПРИМЕР ввод вывод 123 6 на языке python...

123451175

11.10.2022 20:11

Перечислите всех персонажей игры super smash bros melee...

coolmaVIP

13.10.2020 12:53

Соотнеси инструменты модефекации с их названиваниями. Кто может Как можно быстрее ...

MrFoksSuper

29.01.2023 20:42

Сколько символов содержит сообщение, записанное с 16 символьного алфавита, если объём его составил 960 бит?...

Kuznecovaalexa2005

18.04.2022 10:54

Прочитай рассказ н.сладкова каменка-плясунья. а.запиши действия объекта каменка-плясунья. b.какие действия дали название этой птице? надо!...

Dddgirl777

03.04.2021 01:22

1) 120 мб = 122880 кб = 125829120 байт = 1006632960 бит2) 8 мин = 480 сек3) 1006632960 бит/480 сек = 2097152 бод = 2097152 бит/сек == 262114 байт/сек = 256 кб/с,...

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

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