Даны целые положительные числа N и K. Используя только операции сложения и вычитания, найти частное от деления нацело N на K, а также остаток от этого деления.
Ответы на вопрос
Ответил kage1998
0
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.
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.
Новые вопросы