Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.80/25: Рейтинг темы: голосов - 25, средняя оценка - 4.80
0 / 0 / 0
Регистрация: 17.08.2016
Сообщений: 2

Задача Пирамида

17.08.2016, 13:45. Показов 4653. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Добрый день. Мне необходима Ваша помощь для написание небольшой программы:
Из одинаковых кубиков с ребром 1 см выкладывают пирамиду, к-ый слой которой (считая сверху) состоит из k2 кубиков. Какой максимальной высоты получится пирамида, если в наличии имеется N кубиков? Сколько кубиков понадобилось для построения пирамиды?

Входные данные: натуральное число N- количество имеющихся кубиков (1<=N<= 30000).
Выходные данные: два натуральных числа: максимальная высота пирамиды и количество/
пример: входные данные: 8 выходные данные: 2 и 5
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
17.08.2016, 13:45
Ответы с готовыми решениями:

Пирамида из нечетных чисел
Помогите реализовать пирамидку. Нужно чтоб получилось вот так: 1 3 3 3 5 5 5 5 5 ...

Пирамида SABC задана координатами своих вершин. Найти полную площадь поверхности пирамиды
Напишите программу на эту задачу: Пирамиду SABC задано координатами своих вершин. Найти полную поверхность пирамиды.

Задача Пирамида и Полиндром
Как решить? 1 задача. Из кубиков построена пирамида. Кубики поставлены ровно друг на друга. B самом верхнем ярусе кубик только один, и...

2
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
17.08.2016, 14:17
Лучший ответ Сообщение было отмечено ivana33 как решение

Решение

Вроде можно так.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
var n,k,s:integer;
begin
readln(n);
k:=0;
s:=0;
while s<=n-sqr(k+1) do
 begin
  inc(k);
  s:=s+k*k;
 end;
write(k,' ',s);
end.
0
0 / 0 / 0
Регистрация: 17.08.2016
Сообщений: 2
17.08.2016, 14:37  [ТС]
Огромное вам спасибо! Все работает
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
17.08.2016, 14:37
Помогаю со студенческими работами здесь

пирамида
В треугольной пирамиде 2 боковые грани перпендикулярны к плоскости основания и образуют между собой угол альфа. 2 боковые ребра образуют с...

пирамида
помогите мне надо начертить пирамиду с 6 сторон и 7 граней... как это вообще возможно я не представляю... насколько я понимаю стороны это...

пирамида
Найти V пирамиды, ограниченной координатными осями и плоскостью 3х - 2у + 4z + 12 = 0

ПИРАМИДА
Расположите на форме 7 компонентов Tpanel так, чтобы получилась разноцветная пирамида. При щелчке на компоненте, он должен становиться...

Пирамида
Напишите конструирующую программу для пирамиды


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Программный контроль заполнения реквизита табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .
wmic не является внутренней или внешней командой
Maks 02.04.2026
Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
Программная установка даты и запрет ее изменения
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .
Вывод данных в справочнике через динамический список
Maks 01.04.2026
Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Программное заполнения текстового поля в реквизите формы документа
Maks 01.04.2026
Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .
К слову об оптимизации
kumehtar 01.04.2026
Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .
Идея фильтра интернета (сервер = слой+фильтр).
Hrethgir 31.03.2026
Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда
anaschu 31.03.2026
В прикрепленном документе раздумья о том, как можно поменять модель в будущем
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru