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

Ответы:

Mashka Levchenko

11-04-2018 20:53

Var a:integer;beginfor a:=n downto 1 do beginif (a mod 3 = 0)then writeln(a);end;end.

Также наши пользователи интересуются:

Английский язык 2 класс страница 17 задание номер 3 Чему равен размах ряда чисел 27 27 27 28 28 28 29 29 29 31 31 31

Картинка с текстом вопроса от пользователя АЛСУ БАБУРКИНА

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «От 1 до n вывести все числа, которые кратны 3» от пользователя АЛСУ БАБУРКИНА в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!