Даны целые положительные числа N и K. Используя только операции сложения и...

Question

Даны целые положительные числа N и K. Используя только операции сложения и вычитания,найдите частное от деления нацело N на K,а также остаток от этого деления.
ОЧЕНЬ СРОЧНО,прошу!!

Comments

Можете сказать решение,не как в компьютере,а как записать в тетрадь

Answer 1

Program n1;
var
N, K, i: integer;
begin
readln(N, K);
while (N - K >= 0) do
begin
N := N - K;
i := i+ 1;
end;
writeln('Частное от деления: ',i);
writeln('Остаток: ', N);
end.

Comments

Спасибо
А можно так,как нужно записать в тетрадь? Прошу

---

в каком смысле?

---

Вот вы записали как на компе,правильно?

---

А в тетрадь пишут по другому

---

блок схему чтоли?

---

И блок схему тоже