Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Rentels
01.08.2021 19:40 •
Информатика
Найти сумму 23 первых натуральных чисел, которые при делении на 8 остаток 5. в паскаль
Показать ответ
Ответ:
Eennoottt
03.10.2020 04:20
Var i,k,s:integer;
begin
k:=0;
i:=1;
while k<>23 do
begin;
if i mod 8=5 then
begin;
s:=s+i;
inc(k);
end;
inc(i);
end;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
радмир140
07.02.2021 17:28
На метеопосту за период наблюдения в n дней была получена таблица величины атмосферного давления. записать программу, которая: а)определяет максимальный, минимальный...
msa234
08.03.2021 22:47
Как скачать видео вебинары с любого сайта,если на сайте не предусмотрена такая функция?...
LELEGEG
14.04.2020 17:02
Какую вы знаете интегрированную среду визуального программирования на паскале? на какой реализации языка паскаль она основана?...
Nadya0210
11.05.2021 11:21
Нарисуйте блок-схемы и напишите на ая два варианта алгоритма решения : выбрать из двух числовых величин наибольшее значение. первый вариант с полным ветвлением, второй...
tigertuborg
26.01.2020 13:59
Какая форма взаимоотношений между феодалами характерна для периода феодальной раздробленности в западной европе?...
Незнайка0091
26.01.2020 13:59
Неравенства! решить завтра проверяют тест! (-2x-1) (-x-3) (2-x)больше или ровно нулю (1-3x) (x-6) (5x-3) больше или ровно нулю (1-3x) (2-x) (6x-1) меньше нуля (-x-7)...
nekiti444
26.01.2020 13:59
Составьте предложения со словом традиция. чтобы предложение были односоставным,двусоставным, сложным и с вводным словом. нужно....
Znanija96
26.01.2020 13:59
Определите массу воды,содержащуюся в 60г ра-ра naoh с массовой долей 20%...
duyquhuseynli11
26.01.2020 13:59
Придумайте предложение с 2-3 союзами или. заранее ♡♡♥♥...
polina1254
26.01.2020 13:59
Поширте речення? захид сонця над озером. сидало сонце.насувалися хмари.зашелестив очерет.птахи замовкли....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
k:=0;
i:=1;
while k<>23 do
begin;
if i mod 8=5 then
begin;
s:=s+i;
inc(k);
end;
inc(i);
end;
writeln(s);
end.