cho đoạn chương trình sau: i:=1; tong:=0; While i <= 5 do Begin tong:= tong + i; i:= i + 1;