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

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

Показать ответ

Ответ:

karolinaanime

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

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

Yleoliner

23.09.2020 13:55

Oпределите значение переменной b после выполнения следующего фрагмента алгоритма: a = 3 b=a*a-2 a=b+a Определите значение переменной c после выполнения следующего фрагмента...

abdrazakovernat

16.04.2020 13:40

Создать текстовый файл f1 целых чисел. учетверить каждый элемент файла f1 и результат записать в файл f2. вывести на экран результат. c++...

Dinkaakissa20

21.05.2023 12:15

Решите тест по инфе за 8 класс. 1. Какие основные кодовые таблицы вы знаете и в чём их отличие? 2. С какой целью была введена кодировка Unicode? 3. В кодировке Unicode на каждый...

7910066

04.02.2023 08:01

9. Дан массив случайных чисел в диапазоне от -30 до 30 в количестве 35 штук. Найти количество нечётных отрицательных элементов массива....

Volkov1822

23.03.2023 11:08

Контрольные во По какой команде на панели Редактирования можно удалить лишние элементы на чертеже? 2. Назовите основные элементы интерфейса системы трехмерного (3D) твердотельного...

slava90100

15.02.2022 09:14

Контрольные во Для чего нужны презентации? 2. Как создать, удалить, переместить слайд? 3. Как настроить оформление слайда? 4. Как настроить анимацию смены слайда? 5. Как настроить...

JolyHolf1488

06.11.2022 09:51

даю 25б. 1.Як співвідносяться типи даних та елементи для введення значень величин, 2.які операції можна виконувати над числовими й текстовими величинами;3.як налагоджувати...

striletsnastya

02.06.2022 21:04

Дайте відповіді на тестові запитання...

tcalala

11.11.2021 09:00

Кто понимает в Питоне Кто понимает в Питоне...

Бенди3007

11.11.2021 09:00

Запустите Кумир. Введите текст программы рисования ромбов. Нажмите «Обычное выполнение», убедитесь, что ромбы нарисованы. Измените программу так, чтобы она рисовала ряд квадратов...

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

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