найти остаток от деления не используя mod в паскале

Ответ

Автор - 65536

var a,b:integer;
begin
readln(a,b);
writeln(a-b*(a div b));
end.

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.