Тема
:
Pascal, циклы
Показать сообщение отдельно
16.02.2013, 10:38
#
1
(
permalink
)
Rival
Member
Регистрация: 16.02.2013
Сообщений: 17
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация:
10
Pascal, циклы
Помогите пожалуйста решить задачу. Дана формула, идущая до бесконечности. Точность eps=0.1 Нужно найти F(x) при любом x.
Вот есь часть кода, но как все это воткнуть я плохо понимаю.
s:=0
while(t>0.01) do
begin
t=4/pi*(sin(x*(2*n-1))/(2*n-1))
Изображения
Rival
Посмотреть профиль
Найти ещё сообщения от Rival
Ads
Яндекс
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация:
55070