program n_1;
var n, i: int64; x, y, s: double;
begin
read(x, n);
n:=(n-3) div 2;
s:=0; y:=x;
for i:=0 to n do begin
y:=y*x*x;
s:=s+y;
end;
writeln(s:0:5);
end.
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
program n_1;
var n, i: int64; x, y, s: double;
begin
read(x, n);
n:=(n-3) div 2;
s:=0; y:=x;
for i:=0 to n do begin
y:=y*x*x;
s:=s+y;
end;
writeln(s:0:5);
end.