Question

Паскаль. Создать программу для нахождения суммы ряда:
S=x^0+x^2+x^4+x^6+...+x^10

Answer 1

//PascalABC.NET
var
s,x:int64;
i:integer;
begin
Readln(x);
For i:=0 to 5 do s:=s+Round(Power(x,i*2));
Writeln(s);
end.

Answer 2

Спасибо! Правда... Я вчера сам сделал, но пусть для других людей будет