Великий знак, схожий на Е - то сума: http://uk.wikipedia.org/wiki/%D0%A1%D1%83%D0%BC%D0%B0

Великий знак, схожий на Е - то сума: http://uk.wikipedia.org/wiki/%D0%A1%D1%83%D0%BC%D0%B0

magnevitis, не правильно

@magnevitis

Функціонал для обчислення факторіалу має бути таким (а не циклом).

function fac(n: longint):longint; 
begin 
if n<2 then fac:=1 
else fac:=n * fac(n-1) 
end; 

У вас має бути цикл від нижньої до верхньої межі послідовності (2..10, здс) з інтервалом 1, для кожної ітерації розраховується x^2/fac(x) і додається.

magnevitis написав:

Проблема в тому,що ми ще не проходили функціонал і тому задача зробити саме з використанням циклу...

Тоді цикл розрахунку факторіалу має міститися всередині загального циклу:

// Псевдокод

Цикл від 2 до 10 через 1
    Обчислити чисельник
    //Цикл для розрахунку факторіалу
    Цикл від 1 до Х через 1
        Домножуємо
    Весь цикл

    Обчислюємо елемент
    Додаємо елемент до загальної суми
Весь цикл

Можете:

Program rrr;
var
  x, n, k: integer;
  a: real;
Begin
  a := 0;
  while x<=10 do
  Begin
    n := 2;
    k := 1;
    while n <= x do
    Begin
      k := k * n;
      n := n + 1;
    end;
    a := a + 5 * sqr(x) / k;
    x := x + 1;
  end;
  writeln(a);
end.

Але у цьому випадку рахунок почнеться з x=0.

Тоді усе має бути нормально. У кінці-кінців вам ніхто не заважає порахувати результат на листочку, а потім порівняти із тим, що видає ваша програма.