Создать алгоритм и программу для нахождения суммы ряда:Программу такую, когда работаем...

Question

Создать алгоритм и программу для нахождения суммы ряда:

Программу такую, когда работаем например в паскале

Comments

спасибо конечно но там же и алгоритм надо

Answer 1

Var i: integer;
  S, x, x2: double;
begin
  readln(x);
  S := x;
  x2 := sqr(x);
  for i := 1 to 6 do
  begin
    x := x * x2;
    S := S + x / (2 * i);
  end;
  writeln(S)
end.

---

Comments

спасибо конечно но там же и алгоритм надо

---

Что конкретно? Я понимаю под алгоритмом последовательность действий, понятных исполнителю, за конечное число шагов позволяющая решить требуемую задачу. В частности, алгоритм можно записать в виде программы.
Если нужно некое описание - переведите с английского на русский каждую строчку, получится тоже самое по-русски.

---

блок схемы надо, типо начало и т.д

---

А и еще вот про это: Var i: integer;
S, x, x2: double;
begin
readln(x);
S := x;
x2 := sqr(x);
for i := 1 to 6 do
begin
x := x * x2;
S := S + x / (2 * i);
end;
writeln(S)
end.

---

там начинается с Program name : Afonin, а дальше сразу Var i: integer; ?