Написать код в паскале

Question

Написать код в паскале

---

Comments

Gj;fkeqcnf

---

Пожалуйста

---

Что значит j = 1 , 3 ?

---

J=1

---

А тройка там к чему?

---

забудь

Answer 1

Var E,P:decimal;
i,j:integer;
Begin
E:=0;
For i:= 3 to 8 do
    Begin
    P:=1;
    For j:= 1 to 9 do
        P:=P*sqr(i+j);
    E:=E+P
    End;
WriteLn('S = ',E);
End.

Comments

Результат работы программы:
S = 98954644754475417600

---

спасибо