{5} var i, n, t : integer;

{6} begin

{1} t := 0; i := 2;

{2} write('Nhap n = '); readln(n);

{4} while i <= n do

{3} begin t := t + i * i; i := i + 2; end;

{7} write('Tong binh phuong cac so chan: ', t);

{9} readln;

{8} end.

⇒ Đáp án : C. 5 - 6 - 1 - 2 - 4 - 3 - 7 - 9 - 8

Cho bài toán tính tổng bình phương các số chẵn từ 1 đến n; với n được nhập từ bàn phím (T = 2^2 + 4^2 + 6^2 + … + n^2 ). Hãy sắp xếp lại thứ tự các câu lệnh dưới đây để có 1 chương trình đúng.
{1} t:=0; i:=2;
{2} write('Nhap n= ');   readln(n);
{3} begin
           t:= t+i*i;
           i:= i+2;
     end;
{4} while i<=n do 
{5} var i,n,t: integer;
{6} begin
{7} write('Tong binh phuong   cac so chan: ',t);
{8} end.
{9} readln;

5-1-2-3-4-6-7-8-9
5-1-2-3-6-4-7-8-9
5-6-1-2-4-3-7-9-8
5-6-1-3-4-2-8-7-9

Chương trình cụ thể:

var i, n, t : integer;
begin
t := 0; i := 2;
write('Nhap n = '); readln(n);
while i <= n do
begin

t := t + i * i;

i := i + 2;

end;
write('Tong binh phuong cac so chan: ', t);
readln;
end.

=> Đáp án C đúng