Question

Если целое число А делится нацело на цело число В, то вывести на экран частное от деления, в противном случае сообщени "А/В на цело не делится" в поскаль​

Answer 1

мағанда керек срочно беріңдерші

Answer 2

Программа:

program test;

 var

   x, y : integer;

begin

 write('Введите x и y: ');

 readln(x, y);

 if (x mod y=0) then

   writeln('Частное ',x, ' / ',y, ' = ', x/y)

 else

   writeln(x, ' на ', y, ' нацело не делится');

end.

Результат: