Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
vsviridov08p06zai
30.10.2020 14:10 •
Информатика
Паскаль. #учительнеобъясняеттемы вывести на экран числа кратные 5. в диапазоне до 30.
Ответ:
iammrproper
02.10.2020 11:13
Var i: integer;
begin
for i:=5 to 30 do
if i mod 5 = 0 then write(i, ' ');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ramil161
18.01.2021 11:16
Вычислить сумму n слагаемых (n задается оператором ввода): s=1+1/2+1/4+1/8+1/16+ c++...
AnastasiyaSm
18.01.2021 11:16
Pascal и блок схему проверить тождество : 1+2+3+…+n=n*(n+1)/2....
Lena2402bux
20.01.2023 01:51
Утром вы, собираясь в школу, услышали по радио, что днём будет дождь. выходя на улицу, вы захватили с собой зонтик. какие информационные процессы протекают?...
katyabobkova
20.01.2023 01:51
Соос мало времени pascal abc net составить программу найти разницу между наибольшим и наименьшим из пяти часел...
228эрагон
21.08.2022 21:15
лучший ответ! Задание на С++...
Kristibabiba098
09.02.2023 18:35
Почему мы используем датчик цвета при движении робота вдоль линии...
svetaalekperova
01.07.2022 06:53
1 6. Задача 6. Постройте блок-схему для решения следующей задачи: Дано натуральное число n и действительное число a. Вычислить произведение: Р=а*(а+1)*(а+2)*…*(а+(n-1))....
Куколка24
27.03.2021 22:12
Сколько времени потребуется для передачи файла объемом 3072 кб байтов если скорость передачи 4 мегабит...
sofalezina975
22.01.2023 12:57
Якими утворами розмножуються лишайники...
aretem2002
04.10.2020 14:04
Вот по математике задали решить задачу кто зарание Решить задачу: Для приготовления каши на 2 части крупы берут 3 части воды. Сколько граммов воды надо взять на...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
for i:=5 to 30 do
if i mod 5 = 0 then write(i, ' ');
end.