Viết chương trình tính và xúc tổng s = 1 mũ 2 + 3 mũ 2 + 5 mũ 2 + 7 mũ 2 + 9 mũ 2
1 câu trả lời
Uses crt;
Var i:integer,t:longint;
BEGIN
Clrscr;
For i:=1 to 9 do if i mod 2 <> 0 then t:=t+(i*i);
Write('1^2 + 3^2 + 5^2 + 7^2 + 9^2);
Readln
END.
Uses crt;
Var i:integer,t:longint;
BEGIN
Clrscr;
For i:=1 to 9 do if i mod 2 <> 0 then t:=t+(i*i);
Write('1^2 + 3^2 + 5^2 + 7^2 + 9^2);
Readln
END.
