Pascal, подсчитать сумму ряда (c факториалом!)

[Pascal.net]

Подсчитать сумму ряда:
s=1+(ln3/1!)*x + (ln*ln 3/2!) *x*x + .....+ ((ln*ln)*n 3/n!)*(x*x)*n
где 0,1<=x,=1
n=10
(извините за вид самого выражения, не могу выложить рисунок с изображением в форум... Как это сделать?)

[MOTOCoder]

(извините за вид самого выражения, не могу выложить рисунок с изображением в форум... Как это сделать?)

Это можно сделать с помощью кнопки "Управление вложениями" в расширенном режиме.

[Pascal.net]

Никак не могу увидеть кнопку "Управление вложениями", у меня нет такой!
Уже на двух браузерах проверил!

[Хыиуду]

В расширенном режиме?

[Pascal.net]

[Pascal.net]

почему у меня написано: "Вы не можете прикреплять файлы"
Модераторы помогите

[Хыиуду]

Тогда выложите файл на какой-нибудь бесплатный хостинг (типа imagehack.us) и здесь дайте на него ссылку.

[Pascal.net]

http://www.ayola.net/ftp/index.php

[Хыиуду]

Гм, похоже, проще решить задачу, чем дожидаться нормального рисунка.

Код: Выделить всё

s:=1;
a:=3;
c:=1;
for i:=1 to 10 do
begin
  a:=a/i;
  b:=a;
  for j:=1 to i do b:=ln(b);
  c:=c*x;
  s:=s+b*c
end;

[somewhere]

for j:=1 to i do b:=ln(b);

Критическая конструкция, есть большая вероятность что упадет после 3-5 проходов