Показать сообщение отдельно
Старый 03.10.2009, 22:41   #32 (permalink)
Vladimir_S
Специалист
 
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 27,807
Сказал(а) спасибо: 340
Поблагодарили 583 раз(а) в 208 сообщениях
Репутация: 113184
По умолчанию

Цитата:
Сообщение от Dram Посмотреть сообщение
Немного не то
нужно было написать прогу с использованим цикла For
Q= 1+ x/1! + x**2/2!+...+ x**N/N!, N>0 вводится с клавиатуры.

Это для проверки проги (x=5, N=10, s=146.38)

Эх не могу найти свой исходник.Вобшем Как пропишется (Q= 1+ x/1! + x**2/2!+...+ x**N/N!) непосредсвенно в паскаль коде(с экспанетами и фактариалами(fakt)) и что ещё обозначает ... (три точки в функции)
Нет, Леша, из этого сумбура я мало что понял. Прежде всего - результат работы программы:
Название: c1d43b9dbfe8.jpg
Просмотров: 118

Размер: 6.2 Кб
Как писал А.С.Пушкин - "Чего ж вам боле?"
Насчет цикла - а это, по-Вашему, что?
FOR i:=1 TO N DO
Y:=Y+X2np(x,i)/Nfact(i);
По-моему цикл и есть!
Три точки обозначают то же, что, если, допустим, я хочу перечислить все целые числа от 1 до 10, то могу это записать сокращенно: 1, 2, ..., 10. Так же и здесь. Между прочим, эта функция - не что иное, как разложение в ряд экспоненты
Exp(x) = 1 + x/1! + x²/2! + x³/3! + ... + xª/a! (здесь N заменено на a)
Vladimir_S вне форума  
Ads

Яндекс

Member
 
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070