Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Pузик
29.03.2023 18:38 •
Информатика
Составить программу для вычисления суммы четных чисел натурального ряда от 1 до 100
Показать ответ
Ответ:
matyushin06
02.07.2020 11:28
Var s, k: integer;
Begin
S:=0;
For k:=1 to 100 do
If k mod 2=0 then s:=s+k;
Write('сумма четных чисел данного ряда равна ', s);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
Nastia2047
28.09.2022 00:24
Племена Альфа и Бета приготовили друг другу послания. Известно, что послания содержат одинаковое количество информации. Послание племени Альфа составлено из алфавита...
лппериоаоаопоопо
11.09.2020 15:42
В каком текстовом поле указываются адреса получателей при отправке электронного письма? а) Кому б) Тема в) От кого г) Файлы...
Школьник5гокласса2
05.10.2021 21:16
Напишите программу для решения следующей задачи. Камера наблюдения регистрирует в автоматическом режиме скорость проезжающих мимо неё автомобилей, округляя значения...
pofessorZnanija
16.07.2020 05:46
Устудента есть список из четырех вопросов, на один из которых он должен будет ответить. вероятность, что студенту придется отвечать на первый вопрос, равна 0,3, на...
YanaDovgik
16.07.2020 05:46
Вклассе 26 учеников. сколько битов информации содержится в сообщении «сегодня дежурит сеня сенечкин»?...
Lubov080301
25.10.2021 16:18
Нужна ! 1. заполнить массив натуральными числами 2. заполнить массив по правилу: 1 3 5 7 9 11 вводится количество элементов массива (n 100)....
Cru555her
25.10.2021 16:18
Вычислите площадь фигуры ограниченной линиями y=3sinx,y=-2sinx, 0 =x =2пи/3...
Nikart25
25.10.2021 16:18
Как пишется слова расчестка ,шоголь,шеи пол...
жуля7
25.10.2021 16:18
Кто из героев капитанской дочки творит , а кто зависит от её катаклизмов ?...
qd1337
25.10.2021 16:18
На какую высоту поднимется вода в смачиваемой ею капиллярной трубке радиусом 1,5мм...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Begin
S:=0;
For k:=1 to 100 do
If k mod 2=0 then s:=s+k;
Write('сумма четных чисел данного ряда равна ', s);
End.