Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Enotishe
0 / 0 / 3
Регистрация: 27.12.2014
Сообщений: 52
#1

Console: Построить таблицу всех различных разбиений заданного целого N>0 на сумму трех натуральных слагаемых - Delphi

28.12.2014, 11:40. Просмотров 602. Ответов 2
Метки нет (Все метки)

Задача:
Построить таблицу всех различных разбиений заданного целого N>0 на сумму трех натуральных слагаемых (разбиения, отличающиеся лишь порядком слагаемых различными не считаются).
http://www.cyberforum.ru/php-beginners/thread1937973.html
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
28.12.2014, 11:40
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Console: Построить таблицу всех различных разбиений заданного целого N>0 на сумму трех натуральных слагаемых (Delphi):

Для числа от 2 до 20 распечатайте количество его различных разбиений на сумму натуральных слагаемых
Для данного натурального числа от 2 до 20 распечатайте количество его...

Подсчитайте количество различных разбиений числа n на суммы натуральных слагаемых
Помогите пожалуйста решить задачку

Алгоритм нахождения всех разложений натурального числа n на сумму k натуральных слагаемых
Определить и распечатать на экран (по одному разу) все представления...

Вычислить сумму всех натуральных чисел, не превышающих заданного с клавиатуры натурального N
Составить алгоритм вычисления суммы всех натуральных чисел, не превышающих...

Вычислить сумму квадратов всех натуральных чисел, меньших заданного числа А
Здравствуйте. Помогите решить задачу в Паскаль. Надо вычислить сумму квадратов...

2
Tillka
0 / 0 / 1
Регистрация: 05.02.2016
Сообщений: 14
11.02.2016, 11:05 #2
Помогите пожалуйста, мне тоже нужна эта задача
0
SpBerkut
Объявлятель переменных
948 / 274 / 275
Регистрация: 24.09.2011
Сообщений: 1,008
Завершенные тесты: 2
11.02.2016, 11:18 #3
Pascal
1
2
3
4
5
6
7
8
var
  n, i, j: Integer;
begin
  Write('n = '); ReadLn(n);
  for i := 1 to n div 3 do
    for j := i to (n - i) shr 1 do
      WriteLn(i,', ',j,', ', n-i-j);
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
11.02.2016, 11:18
Привет! Вот еще темы с решениями:

Построить таблицу значений для функции f(x) = tg(x) на отрезке [0,pi/4] с числом разбиений отрезка m=10
C# Построить таблицу значений для функции f (x) = tg(x) на отрезке с...

Для данного натурального числа от 2 до 20 распечатайте количество его раз-личных разбиений на сумму натуральных
Для данного натурального числа от 2 до 20 распечатайте количество его...

Количество разбиений на k слагаемых
Для данных натуральных чисел n и k определите количество способов представить...

Количество разбиений на k слагаемых
Для данных натуральных чисел n и k определите количество способов представить...


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

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

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