Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Rys2017
25.07.2022 18:38 •
Информатика
Составить программу. вывести на экран 10 первых целых чисел кратных 7 pascal. если правильно ещё .
Ответ:
несахар1
09.10.2020 06:12
var a,i:integer;
begin
for a:=14 to 77 do
begin
if (a mod 7=0) then
write(a,' ');
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
chukalina
20.04.2020 09:43
1. Заполните пустые поля с точками а) клавиша для перемещения курсора к новому абзацу. —б) клавиша удаления слева от курсора -г) клавиша, чтобы оставить пустое место между...
урган1
26.09.2020 18:27
Scratch. как удалить блок из алгоритма? надо.....
linakirilinaa
26.09.2020 18:27
Заполнить массив из 10 элементов случайными числами из диапазона от -5 до 5. (паскаль)...
ketrinkryt
29.09.2022 17:13
Напишите программу каторая вазводит в квадрат нечетное число и делит на 2 четное....
eromadima
29.09.2022 17:13
Имеются два кувшина 8 л и 3 л.с этих кувшинов налейте 4 л.опишите алгоритм решения словесным и графическим....
lllviktorialll
15.02.2020 09:04
Как выделялось на папирусах начало новой мысли? как мы выделяем новый абзац в тексте?...
Direx1337
15.02.2020 09:04
Назовите существенные признаки пуделя...
Bloger1579
10.11.2021 02:18
[python] с клавиатуры вводятся 4 целых числа a, b, c и d. выведите на экран ab + cd...
darkdemonsown3mz
24.05.2020 11:22
Какой объем озу требуется для хранения текста объемом 425 страниц на каждой из страниц размещёно 32 по 64 символа в строке...
ТвОйМаЛьЧиК
23.05.2022 09:03
)уравнение медианы ad. треугольника abc, а(2,-3), в(1,0), с(-2,-4) имеет вид...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a,i:integer;
begin
for a:=14 to 77 do
begin
if (a mod 7=0) then
write(a,' ');
end;
end.