Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
dfefert4tNNN
18.04.2021 11:59 •
Информатика
Вывести на экран все натуральные числа делящиеся на 3 без остатка
Показать ответ
Ответ:
HoneyAmy
01.10.2020 13:59
Var mas : array [1..100000] of longint;
i,n : longint;
begin
read(n);
for i:=1 to n do begin
read mas[i];
end.
for i:=1 to n do begin
if mas[i] mod 3=0 then write (mas[i],' ');
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
littlecat123
10.12.2020 17:34
70 . дан целочисленный массив из 30 элементов заданный случайным образом. элементы массива могут принимать целые значения от -30 до +30 - значение среднесуточной температуры для каждого...
elizavetaivlic
05.06.2023 05:13
75 . lazarus, pascal.допишiть програму обчислення функцiї: y= {sqrt(x), якщо x 0 {x^2 + 1, якщо x =0з використанням складеної умови: var beginx: =strtoint(edit1.text); if x 0 label1.caption:...
batrazmargit
16.11.2021 10:15
70 . в неправильном четырехугольнике известны длины сторон и диагональ. вычислите его площадь. использовать функцию вычисляющую площадь треугольника. паскаль...
Курьяма1
16.02.2021 23:21
Онлайн мектеп 4класс даю...
witerold
02.01.2021 12:32
То не может являться источником проникновения вируса на компьютер? а)модем б) электронная почта в) жесткий диск г) съемные носители ответьте .буду блогадарна...
Milimili12345
13.12.2022 15:41
Примеры данных и условия, при которых они становятся информацией. !...
ленусиклд
22.04.2022 18:25
Mвекторов x1=(x11,x21,x31), xm=(x1m,x2m,x2m),написать программу нахождения суммы этих векторов ....
KittiKitimi
02.07.2020 00:11
Ввести натуральное число и вывести все числа от 1 до этого числа. программа кумир составить алгоритм на языке алгоритм начало и т.д. все...
KapitanNEMO
11.03.2022 10:09
Химия 9 класс сопоставить Мыло, стиральный порошок и другие моющие средства намного эффективнее действуют в мягкой воде. Жесткость воды обусловлена наличием в ней солей кальция и...
qqruzko
30.04.2021 20:27
, построить аккордовую последовательность в тональности E-dur T6-D64-D43-T53-77-D65-T53...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i,n : longint;
begin
read(n);
for i:=1 to n do begin
read mas[i];
end.
for i:=1 to n do begin
if mas[i] mod 3=0 then write (mas[i],' ');
end;
end.