Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Анастасия5863
09.12.2020 00:26 •
Информатика
Найти сумму целвх положительных чисел кратных 4 и меньше 100
Показать ответ
Ответ:
znj93294znj93294
03.10.2020 06:38
//Pascal ABC.NET v3.0 сборка 1111
Var
i,s:integer;
begin
s:=0;
for i:=1 to 99 do
if i mod 4=0 then s:=s+i;
write(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Макуегщ
06.04.2023 00:57
Операционая система это...
Hapec
31.01.2021 08:35
В каждом определении выберите и подчеркните подходящий вариант из предложенных: 1. Внешняя память (ВЗУ) - это память для длительного/кратковременного хранения программ иданных,...
Lyuda56
20.06.2020 09:43
Решите 2 по графам. желательно с фото. 35 ! 1 : исполнитель преобразует число на экране. у исполнителя есть три команды, которым присвоены номера: 1) прибавить 1; 2) прибавить...
Kykyblohka
05.04.2022 22:06
Однажды некий путешественник гостил на острове рыцарей и лжецов. там ему встретились два местных жителя. путешественник спросил одного из них: «кто-нибудь из вас рыцарь?...
133fdsf7za
05.11.2021 12:32
4. Почему выполняется умножение (логическое) и между IP-адресом и маской для определения границ подсети?6. Чем определяется взаимосвязь между IP-адресом и маской подсети?...
alenazakhar2000al
10.03.2022 14:04
Сформулируйте и напишите цели и задачи эргономики, используя метод «Кластер».Цель эргономикиИЗадачи эргономики...
malievaanzira05
01.06.2021 15:04
Приведенная ниже программа решает следующую задачу: идет к-я секунда суток. Определить,сколько целых часов (H) и целых минут (М с начала суток. Например, еслик=13257=3·36000+40·60+57,...
saulefazylovnap00xfc
15.08.2022 10:06
2) Определите, что будет на выходе в результате выполненияалгоритма. Запишите условие задачи, для которой составленданный алгоритмvarn: integer;beginn: 200while (n mod 17...
Anuliks
12.10.2021 14:16
Решить примеры 100 mod 5 14 mod 3 15 mod 3 23 div 4 42 div 13 9 div 4...
Дашундель
10.07.2020 12:33
Взаємодія кислоти з миталами Zn+HCI...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Var
i,s:integer;
begin
s:=0;
for i:=1 to 99 do
if i mod 4=0 then s:=s+i;
write(s);
end.