Среди чисел от 1 до 20 выведите числа, которые делятся на 3 pacskal begin end

Чтобы найти числа от 1 до 20, которые делятся на 3, мы можем просто перечислить все числа в этом диапазоне и проверить, делится ли каждое из них на 3.

Числа от 1 до 20, которые делятся на 3:

• 3
• 6
• 9
• 12
• 15
• 18

Если вам нужно использовать этот список в коде, вот простой пример на языке Pascal:

program DivisibleByThree;
var
  i: integer;
begin
  for i := 1 to 20 do
  begin
    if i mod 3 = 0 then
      writeln(i);
  end;
end.

В этом коде мы используем цикл for, чтобы пройти по всем числам от 1 до 20, и проверяем, делится ли каждое число на 3 с помощью оператора mod. Если результат равен 0, мы выводим это число.

Если вам нужно что-то ещё узнать, не стесняйтесь спрашивать!