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

Question

Петяня

11 апреля, 02:32

+2

Ответы (1)

Знаете ответ?

Антон · Answer 1

Program gt;

var n, k, t:integer;

begin

read (n, k) ;

t:=0;

while n>=k do

begin

n:=n-k;

t:=t+1;

end;

writeln (t) ;

end.