Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Nadya1111111111111
06.04.2022 02:30 •
Информатика
Найти сумму всех четных натуральных чисел от 2-х до n
Ответ:
kadnikovaliza
05.10.2020 13:50
Program n1;
var sum,i,n: integer;
begin
readln(n);
sum:=0;
for i:=2 to n do if i mod 2=0 then sum:=sum+i;
writeln(sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
super12345167
17.08.2022 15:29
В чем заключаются различия в выполнении основных алгоритмических структур: следование, ветвление, цикл со счетчиком и цикл с предусловием...
Лиза109876543
12.08.2022 17:11
Зайки с программирование;)...
lisasmirnova26
07.04.2020 16:57
задача плутон На Масляну Змій Горинич та баба-Яга приготували х млинців та сіли смакувати. Баба-Яга з їла а(a =x) млинців... Скільки млинців залишилося для Змія Горинича...
hatidzemustafaeva
26.10.2021 03:24
Умоляю это действует на мою оценку...
Vera2200
21.03.2023 11:42
Задание No3 Просмотрите код программы. Выберите к какому виду цикла относиться?a = 0while a = 0;if a == 7:breakа += 1print( A )2Цикл с параметромбесконечный циклконечный...
Svetlanaaaa16
23.01.2020 17:41
В тетради кратко ответьте на вопросы 1) Что такое линейный алгоритм? 2) Приведи примеры линейных алгоритмов из области применения Роботов 3) Для чего нужен блок «Независимое...
zzzzzzya2017
28.03.2023 04:46
Почему у меня на пк мышка сама двигаеться?...
Настя190411
16.01.2022 02:49
ЧТО ИЗ ЭТОГО СИСТЕМНЫЕ ПРОГРАММЫ? WinRar Gimp MS Word Java C++ Pascal Avast...
ilinovam
23.09.2021 07:56
Мәтіндерде қолданылған тілдік құралдарды анықта. 1-мәтінДінмұхамед Қонаев 1912 жылы 12 қаңтарда Верный (қазіргі Алматы) қаласында, өмірге келген. Әкесі – Меңліахмет...
Apelsinka0986
09.10.2021 09:24
Дан водный раствор электролита BaI2. Как изменяется рН раствора у электродов в процессе электролиза (увеличится, уменьшится, не изменится)?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var sum,i,n: integer;
begin
readln(n);
sum:=0;
for i:=2 to n do if i mod 2=0 then sum:=sum+i;
writeln(sum);
end.