Найти остаток от деления не используя mod в паскале
Var a,b:integer;
begin
readln(a,b);
writeln(a-b*(a div b));
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Var a,b:integer;
begin
readln(a,b);
writeln(a-b*(a div b));
end.