Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
пожалуйстапомогите15
19.03.2022 19:18 •
Информатика
Работа в паскале составьте программу вычисления суммы всех трехзначных чисел кратных 4
Показать ответ
Ответ:
ника2569
06.10.2020 01:30
Uses crt;
var
n, sum:integer;
begin
n := 100;
while n < 1000 do
begin
sum += n;
n += 4;
end;
writeln('Сумма всех трёхзначных чисел, кратных 4= ',sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
анна2255
19.01.2020 09:46
выяснить является ли введеное целое число чётным и вывести соответствующий ответ на экран нужна написать программу...
morti3
05.02.2021 07:44
1. Понятие информатики и информаций. Свойства информаций. 2. Основные этапы развития информационного общества.3. Системы счисления.4. Арифметические и логические основы работы...
АнимешкаПельмешка
07.06.2021 02:17
5.1 Форми подання алгоритмів. 5.2 Основні елементи блок – схем алгоритму. 5.3 Базові алгоритмічні структури....
kaanekiken
16.01.2020 20:03
Объясните во Дается текстхватит ли 5-битного кодирования, то есть было ли в данной строке не больше 32 уникальных символов. Unicode...
PlatMasha
29.11.2022 00:15
Можете проверить правильность заполнения таблицы?...
Caшa2220
12.10.2021 02:50
Из ряда чисел 1, 12, 22, 33 выпиши те, которые удовлетворяют условию быстро надо...
enigma75
12.10.2021 02:50
Твердження, яке може бути Істинним або хибним ?...
milanabzhityants
02.10.2021 23:47
Для передачи информации по каналу связи с помехами используется 5-битовый код.Сообщение содержит только буквы А, В и С, которые кодируются следующими кодовымисловами:A-10101,...
Lizkic
22.10.2022 11:15
В летнем лагере отдыхало 87 семиклассник(-ов, -а). 7 из них не любят компьютерные игры. 50 семиклассник(-а, -ов) предпочита(-ют, -ет) квесты, 60 — симуляторы. Сколько ребят...
артем1ппн
23.11.2020 04:10
После выполнения команды присваивания x:=x+y значение переменной x равно 3, а значение переменной y равно 19. Чему были равны значения переменных x и y до выполнения указанной...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
n, sum:integer;
begin
n := 100;
while n < 1000 do
begin
sum += n;
n += 4;
end;
writeln('Сумма всех трёхзначных чисел, кратных 4= ',sum);
end.