Pascal Дано три целых числа. Вывести на экран те, для которых число А будет делителем.

Pascal Дано три целых числа. Вывести на экран те, для которых число А будет делителем.

Срочно помогите

Pascal Дано три целых числа. Вывести на экран те, для которых число А будет делителем.: 1 комментарий

  1. Var  a, b, c, d: integer;
    begin
      read(a, b, c, d);
      if(b mod a = 0) then writeln(b);
      if(c mod a = 0) then writeln(c);
      if(d mod a = 0) then writeln(d);
    end.

Обсуждение закрыто.