Выберете типы исполнителей:
Формальный
Общий
Неформальный
Можно Выбрать Несколько
232
394
Ответы на вопрос:
var
c: integer;
begin
c : = 10;
while c < 100 do
begin
if ((c mod 10) mod 3 = 0) and (c mod 10 < > 0) then
write(c, ' ');
c : = c + 1;
end;
writeln;
end.
Популярно: Информатика
-
leonn115.03.2021 16:24
-
Krowly23.06.2022 08:32
-
IKristin10.10.2022 03:53
-
gregsorvenkov23.05.2021 01:12
-
кошка44825.05.2022 03:25
-
2518283006.10.2021 16:37
-
KREZZOR06.02.2023 06:43
-
madina192001.05.2022 19:32
-
lowander300019.02.2021 21:59
-
alenkaviktorov24.08.2021 19:10