Войти Регистрация Спроси ai-bota

От 1 до n вывести все числа, которые кратны 3

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

motay121

17.01.2021 04:04

Найти сумму положительных и количество нечетных элементов массива а(10). через паскаль , !...

bill3334

17.01.2021 04:04

Решите в паскале, использование массивов, вычислить сумму тех элементов массива а(10), числовые значения которых принадлежат полуинтервалу i ≤ a[i] ≤ i+1....

grgrgrgrgrrhrrhrgrgr

13.04.2022 03:50

Составить программы вывода на экран всех чисел из промежутка от 1 до n, которые делятся на 7 и 5. Решить через три цикла - пока, до и for (т.е. будет три решения). Паскаль...

21Oleg12

08.10.2020 00:39

Какой объём памяти займёт приведённый ниже текст: если известно что в нём используется кодировочная таблица UNICODE: Лес - точно терем расписной....

MilаKlimenkova

06.04.2020 13:09

1. Збережіть назви мов світу, які вводяться в одному рядку через пропуск, у списку. Простежте за тим, щоб елементи у списку не зберігались в алфавітному порядку. Відсортуйте список...

Леша119

19.03.2023 11:11

сделать программу в пайтоне буду очень сильно благодарен...

Zhuldyz2005

05.12.2022 16:20

(Delphi / Pascal) Составить листинг программы, которая выводит на монитор фамилии и имена студентов, имеющих средний не менее 4....

Лисичка6661

07.06.2020 05:09

Дан целочисленный массив а[n]. определить, сколько элементов массива а принимает наименьшее значение. написать программу на с++...

МаркЛеткеман

07.06.2020 05:09

Короче хочу купить hdmi но на телефе нет этого что делать ? ? хочу вывести изображение телефона на тв...

frankinshtein228

07.06.2020 05:09

Составьте программу планирования покупки товара...

Ответ:

tatblin

04.10.2020 09:20

Var a:integer;
begin
for a:=n downto 1 do begin
if (a mod 3 = 0)
then writeln(a);
end;
end.

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку