Ответы на вопрос:
var i: integer;
begin
i := 1;
repeat // начало тела цикла
if ((i mod 3)=0) and ((i mod 6)=0) then #проверяем условия
write(i, ' ');
i := i + 1; #увеличиваем счетчик на 1
until (i > 11); #выход из цикла только если счетчик станет больше n
readln();
end.
Объяснение:
Все что стоит за знаком # это коментарий к записи.Так как на информатике проходят паскаль,сделал на языке Pascal
я не могу написать , как они называются , потому что мне не хотят сохранять
Популярно: Информатика
-
Сакура203408.02.2021 08:23
-
MarinaSc108.05.2020 19:00
-
alesiakorneva10.07.2021 05:42
-
Бллллллл02.04.2021 19:09
-
veronikamantul29.04.2021 21:51
-
Светило111Науки28.07.2020 08:22
-
kimhakip0957712.04.2022 14:11
-
Margarita091217722.11.2021 15:29
-
Rollov3517.04.2023 05:06
-
spartanash27.08.2020 16:36