Question

ПАСКАЛЬ!!!! составить алгоритм, находящий остаток от деления одного натур-го числа на другой( диф и мод не использовать)

Answer 1

Можно использовать другие команды? Например Trunc?
Если да, то вот:
var i,j,n:integer;
s:real;
begin
readln(i,j);
s:=i/j;
n:=i-j*Trunc(s); {Функция Trunc выделяет целую часть}
writeln(n);
end.
Если нельзя пользоваться Trunc, то вот другое решение:
var i,j:integer;
s,m:real;
begin
readln(i,j);
m:=i/j;
s:=m;
while s>=1 do s:=s-1;
m:=m-s
;writeln(i-j*m;);
end.

Answer 2

Алгоритм нахождения остатка от деления двух натуральных чисел

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

1. Инициализируйте переменные `dividend` (делимое) и `divisor` (делитель) соответствующими значениями. 2. Создайте переменную `quotient` (частное) и установите ее равной 0. 3. Пока `dividend` больше или равно `divisor`, выполняйте следующие шаги: - Вычтите `divisor` из `dividend`. - Увеличьте `quotient` на 1. 4. Остаток от деления будет равен значению `dividend`.

Ниже приведен пример алгоритма на языке Python:

def find_remainder(dividend, divisor):
    quotient = 0
    while dividend >= divisor:
        dividend -= divisor
        quotient += 1
    return dividend

# Пример использования
result = find_remainder(10, 3)
print(result)  # Выводит: 1

Примечание: