Cho đoạn chương trình :
I :=1
While i<=50 do
Begin
If ( i mod 2) =0 then s :=s + i;
I :=i +1 :
End :
Write ( 's=',S) ;
Em hãy cho biết :
Đoạn trên chương trình trên thực hiện công việc gì
Kết quả xuất ra màn hình
Cho đoạn chương trình :
I :=1
While i<=50 do
Begin
If ( i mod 2) =0 then s :=s + i;
I :=i +1 :
End :
Write ( 's=',S) ;
Em hãy cho biết :
Đoạn trên chương trình trên thực hiện công việc gì
Kết quả xuất ra màn hình
Tính tổng cái số : hết cho 2 từ 1 đên 50.
Kết quả ra 650