Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
люба358
20.06.2021 04:47 •
Информатика
Инфа, 9 класс найти сумму всех натуральных чисел до n, которые кратны 3 и одновременно являются нечётными. эти числа вывести на экран в одну строку.
Показать ответ
Ответ:
risha5239
25.08.2020 21:46
Var
n, i : longint;
begin
readln(n);
for i:= 2 to n do
if (i mod 2 <> 0) and (i mod 3 = 0) then
begin
write(i);
write(' ');
end;
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
tgeibdizn
20.08.2022 22:23
C++ условие: даны два числа. необходимо определить является ли только одно из них нечётным. входные данные: на вход два натуральных числа. выходные данные: в выходной файл должна быть...
rusik20022002
27.12.2020 02:55
Задача с ответом на тему: Подпрограммы на языке Паскаль....
12dosbol
24.06.2020 19:24
Що таке проміжний результат у математичних моделях? ...
artemushakov0артем
14.07.2020 18:15
Для формулы A/\ (B \/ ¬B /\¬C) постройте таблицу истинности...
mrwiner
07.01.2020 07:08
Высказывание Прозвенел звонок и закончился урок а и истинное б)сложное и истинное в и ложное г)сложное и ложное...
nata121114
08.02.2022 04:30
Как работать с гипертекстовыми ссылками?...
denissneganatan
09.12.2020 02:22
Описати за до записів на Паскалі об’єкт – товар, який характеризується назвою, ціною, вагою....
natalyabelozer3
24.01.2023 05:03
Составить блок-схему, находящие корни квадратного уравнения ax2 + bx + c = 0 X1=(-b+SQR(d))/(2*a) X2=(-b-SQR(d))/(2*a)...
з1з1
16.03.2022 15:47
В кодировке UTF-16 каждый символ кодируется 16 битами. Влад написал текст (в нём нет лишних пробелов): «Мята, тыква, огурец, артишок, патиссон, картофель — овощи». Ученик вычеркнул...
srs777s
17.09.2022 12:36
Төменде берілген сөйлемдегі 1 жəне 2 деген сандардың қолданылу мақсатың анықтаңыз.Компьютердің құрылғылары негізгі жəне қосымша болып бөлінеді...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
n, i : longint;
begin
readln(n);
for i:= 2 to n do
if (i mod 2 <> 0) and (i mod 3 = 0) then
begin
write(i);
write(' ');
end;
end;
end.