Chương trình trên bị sai về vị trí các dòng {2}, {9}, {10}, {11}, {12}, hãy sắp xếp lại các vị trí của các dòng này để được chương trình đúng

​Cho chương trình sau ( bằng Turbo Pascal):
Begin {1}
Write('Tong cac so chan lon hon 50 la:',t);{2}
While i<50 do{3}
Begin{4}
If i mod 2=0 then{5}
t:=t+i;{6}
i:=i+1;{7}
end;{8}
Uses crt;{9}
Var i, t:integer;{10}
i:=1; t:=0;{11}
Clrscr;{12}
Readln;{13}
End.{14}
â) Chương trình trên bị sai về vị trí các dòng {2}, {9}, {10}, {11}, {12}, hãy sắp xếp lại các vị trí của các dòng này để được chương trình đúng.
b) Hãy cho biết công dụng của chương trình trên