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

Question

Милий

27 июня, 19:52

+1

Ответы (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.