Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
Gouvere
19 / 19 / 8
Регистрация: 25.11.2013
Сообщений: 122
1

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

16.11.2014, 13:17. Просмотров 851. Ответов 2
Метки нет (Все метки)

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

Помогите, пожалуйста, решить, подскажите алгоритм.
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
16.11.2014, 13:17
Ответы с готовыми решениями:

Операции сложения, вычитания, умножения и деления в троичной СС
Операции сложения, вычитания, умножения и деления в троичной СС. (тип данных массив, числа...

Используя операции деления нацело и взятия остатка от деления, найти количество и сумму цифр числа
Можете решить вот эти задачи.. Заранее спасибо!!:friends: 1) Дано целое число N(>0). Используя...

Дано целое число N(>0).используя операции деления нацело и взятия остатка от деления, найти количество и сумму его цифр.
помогите, пожалуйста Дано целое число N(>0).используя операции деления нацело и взятия остатка от...

Даны два целых числа A и B. Получить их частное, остаток от целочисленного деления A на B, а также значение степени числа AB
Даны два целых числа A и B. Получить их частное, остаток от целочисленного деления A на B, а также...

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

2
Legolas
170 / 56 / 45
Регистрация: 21.06.2012
Сообщений: 261
16.11.2014, 14:57 2
Лучший ответ Сообщение было отмечено Gouvere как решение

Решение

держите
Pascal
1
2
3
4
5
6
7
8
  sum:= 0;
  x:= 0;
  y:= 0;
  while sum<=n do
  begin
    sum:=sum+k;
    if n-sum>=k then inc (x) else y:=n-sum;
  end;
x - частное
y - остаток
p.s. тут конечно еще используется операция сравнения, но я думаю без этого все-равно не обойтись, ведь задача по любому решается через цикл, а какой цикл без проверки?
1
APALoff
1641 / 1070 / 1081
Регистрация: 03.07.2013
Сообщений: 4,507
17.11.2014, 13:02 3
Лучший ответ Сообщение было отмечено Gouvere как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Function divNK(n,k : Longint) : Longint;
Begin
  If n>=k then divNK:=1+divNK(n-k,k) else divNK:=0;
end;
 
Function modNK(n,k : Longint) : Longint;
Begin
  While n>=k do Dec(n,k);
  modNK:=n;
end;
 
Begin
  Writeln(divNK(17,5));
  Writeln(modNK(17,5));
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.11.2014, 13:02

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

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

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


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru