Question

Как решить в паскале задачу: вывести числа от 10 до 30, которые делятся на 2 и на 3, но не делятся на 4

Answer 1

Вот числа 18,30 и все.

Answer 2

Решение задачи в Pascal

Для решения данной задачи в Pascal, необходимо написать программу, которая будет выводить числа от 10 до 30, которые делятся на 2 и на 3, но не делятся на 4. Вот пример программы на Pascal, решающей данную задачу:

program DivideCheck;
var
  i: integer;
begin
  for i := 10 to 30 do
  begin
    if (i mod 2 = 0) and (i mod 3 = 0) and (i mod 4 <> 0) then
      writeln(i);
  end;
end.

В этой программе мы используем цикл `for`, чтобы перебрать числа от 10 до 30. Затем мы проверяем каждое число на условия: оно должно делиться на 2, делиться на 3 и не делиться на 4. Если число удовлетворяет этим условиям, оно выводится на экран.

Это пример программы на Pascal, которая решает данную задачу.