Задача на цикл free Pascal - Паскаль, Turbo Pascal, PascalABC.NET

}|{eka · 01.04.2012, 16:26

Помогите пожалуйста в решении задачи на циклы for,while,repeat:
На воду опущен шар радиуса r, изготовленный из вещества плотности p (p<1). Найти расстояние от центра шара до поверхности воды. Указание. При составлении программы воспользоваться формулой объема шарового сегмента высоты h: V = Пи*h^2*(3r - h)/3, где r - радиус шара, h - высота шарового сегмента.

TinMan · 02.04.2012, 05:11

Цитата:

Сообщение от }|{eka

Помогите пожалуйста в решении задачи на циклы for,while,repeat:

Я как ни старался, так и не увидел тут возможности приткнуть цикл. Простые вычисления по формуле - и ничего больше..
Жека, ты то-то не дописал?

01.04.2012, 16:26	#1
}\|{eka Пользователь Регистрация: 01.04.2012 Сообщений: 16	Задача на цикл free Pascal Помогите пожалуйста в решении задачи на циклы for,while,repeat: На воду опущен шар радиуса r, изготовленный из вещества плотности p (p<1). Найти расстояние от центра шара до поверхности воды. Указание. При составлении программы воспользоваться формулой объема шарового сегмента высоты h: V = Пиh^2(3r - h)/3, где r - радиус шара, h - высота шарового сегмента.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Задача(Free Pascal)	Nastya1221	Помощь студентам	0	21.02.2012 17:36
Turbo Pascal и Free Pascal , в чем разница?	antoxann	Паскаль, Turbo Pascal, PascalABC.NET	31	09.11.2011 07:52
Задача на pascal(цикл)	SkuLLL	Помощь студентам	3	12.12.2010 13:35
а free pascal не читает задачи которые написаны на turbo pascal?	demonara	Паскаль, Turbo Pascal, PascalABC.NET	3	25.05.2009 16:28
[Pascal]: Задача на символьную строку, цикл, одномерные массивы., выручите плз	Knife	Помощь студентам	2	31.03.2009 21:41