Вопрос, который вызвал трудности

Надо ввести два числа и программа должна показать делиться ли на друг друга или нет

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.

После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:

Pascal
Program determiner;
Var a, b, c: real;
Begin
Readln(a, b);
C:=0;
If (a > b) then
Begin
If (a mod b = c) then
Writeln('Yes')
Else writeln('No')
End
Else begin
If (b mod a = c) then
Writeln('Yes')
Else writeln('No);
End;
End.