Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Коtик
19.03.2021 00:23 •
Информатика
Вывести на экран в интервале от а до 6 все числа кратные 5
Ответ:
3508
24.05.2020 12:47
BEGIN
write('Введите а');
readln(a);
for a to 6 do
if a mod 5 = 0 then writeln(a,' \ ');
readln
END
0,0
(0 оценок)
Популярные вопросы: Информатика
lebeckaaanna
16.03.2022 11:25
найти произведение двузначных нечетных чисел кратных 13 в интервале от 1 до 1000...
vladgrigav
16.03.2022 11:25
Вариант 2 1. найдите ошибку. файл – это: а) любая информация, записанная на технические носители под определенным именем б) программа, записанная на диск в) документ,...
atapinalidia577
13.06.2021 07:51
Переведите в десятичную систему счисления шестнадцатиричное число 2С *...
danilponomary
28.01.2023 10:13
у нас сор по информатике ...
Симская
08.01.2021 08:39
Рівняння 14016:b+7384=7822 50310-a:67=49875...
НеизвестныйНикнейм
30.03.2020 13:16
, Разложите на множители 64-4z-z²+z³...
1lilita
26.04.2021 00:21
Вирішіть мені задачі з фізики за 8 клас! Здесь 3 задачи !...
berteret6
21.07.2022 19:04
Между кадетами взвода поровну распределили 140 мандаринов и 84 банана. Сколько кадет во взводе если известно, что их больше БЫСТРЕЙ...
qqlaza
03.06.2020 14:30
Зведи дроби 5/12 і 7/18 до НАЙМЕНШОГО спільного знаменника...
BlaBla1aquamarine
20.09.2020 03:16
ПОЖЯЖЯ LF. ЧИЇМИ ОЧАМИ МИ БАЧИМО ПОРТРЕТ ГОБСЕКА???...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
BEGIN
write('Введите а');
readln(a);
for a to 6 do
if a mod 5 = 0 then writeln(a,' \ ');
readln
END