Предмет: Информатика,
автор: ksvt
Даны целые положительные числа N и K. Используя только операции сложения и вычитания,найдите частное от деления нацело N на K,а также остаток от этого деления.
ОЧЕНЬ СРОЧНО,прошу!!
Ответы
Автор ответа:
0
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.
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.
Автор ответа:
0
в каком смысле?
Автор ответа:
0
Вот вы записали как на компе,правильно?
Автор ответа:
0
А в тетрадь пишут по другому
Автор ответа:
0
блок схему чтоли?
Похожие вопросы
Предмет: Математика,
автор: tilisroma33
Предмет: Английский язык,
автор: mikaelananna1
Предмет: Информатика,
автор: ne330164
Предмет: Математика,
автор: Araika18
Предмет: Математика,
автор: nastya19891806