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

program gt;var n,k,t:integer;beginread(n,k);t:=0;while n>=k dobeginn:=n-k;t:=t+1;end;writeln(t);end.