Вывести на экран двузначные числа последняя цифра - вопрос №1525299 от svistmi20061 27.08.2022 06:15

Question

Информатика: Вывести на экран двузначные числа последняя цифра которых кратна 3 циклом while

svistmi20061 · Answer

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.  ...