//PascalABC.NET v3.3 1699
begin
var i:=1;
var S:=0;
while i <= 9 do
S += Sqr(i);
i += 2;
end;
writeln('S = '+s);
end.
//PascalABC.NET v3.3 1699
begin
var i:=1;
var S:=0;
while i <= 9 do
begin
S += Sqr(i);
i += 2;
end;
writeln('S = '+s);
end.