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

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

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку