Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Nasvay228
02.12.2020 16:22 •
Информатика
Выведите все числа от 15 до 30, которые делятся на 3 без остатка. причем на экране они должны идти в обратном порядке. паскаль. попроще.
Ответ:
DarinaDoka666
09.10.2020 00:16
var i:integer;
begin
for i:=30 downto 15 do
if i mod 3 = 0 then write(i,' ');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ячетнмнжневсебе
11.11.2022 18:24
Проверить является ли введенное слово палиндромом. нужно решить на питоне и паскале. !...
shishkinaviolet
29.10.2022 09:27
{задать массив из 10 случайных чисел в диапазоне [32,96]. вывести минимальное число массива и его индекс.}...
vasilevasanka
27.02.2020 23:44
Что означает двоеточие в алгоритме? например y: =20; x: =1 y: =y-x x: =x*2 что эти двоеточие вообще означает? объясните : )...
XOPOSHISTIK
27.02.2020 23:44
1.дан одномерный массив из n элементов. заменить в нем значение макс и мин элемента на сумму всех элементов массива 2. дан одномерный массив из н элементов. найти среднее арифметическое...
larisa114
30.03.2021 13:10
Впаскале.за год ребенок прибавляет в весе 7 кг. напечатать прибавку в весе ребенка за 5 лет...
Raimbek711
30.03.2021 13:10
Вклассе 35 человек двадцать пять читателей школьной библиотеки 20 читателей городской библиотеки сколько человек читают в 2 библиотеках? по действиям с кратким пояснением 30...
pikulev
31.07.2021 12:04
Среди шестизначных натуральных чисел найдите числа, в которых цифры этого числа образуют строго убывающую последовательность. Например, 854321 или 875420. А число 965532 не удовлетворяет...
Rimmakrasa
12.07.2021 08:18
Между населёнными пунктами A, B, C, D, E, F построены дороги, протяжённость которых (в километрах) приведена в таблице. Определите длину кратчайшегопути между пунктами A и D....
Pitbull2015
15.09.2022 18:11
8 Файл размером 2 Мбайта передаётся через некоторое соединение за 80 секунд. Определите размер файла (в Кбайтах), который можно передать через это жесоединение за 120 секунд....
Cobra237
23.11.2022 03:04
Напишите наименьшее число x, для которого истинно высказывание: НЕ (x 32) И НЕ (сумма цифр числа x не равна 15)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var i:integer;
begin
for i:=30 downto 15 do
if i mod 3 = 0 then write(i,' ');
end.