NP

dùng while ... do tính tổng Các số tự nhiên chẵn S= 0+2+4+6...cho biết từ khi S>200 thì dừng . thông báo ra màng hình

ML
17 tháng 3 2023 lúc 22:52

Program HOC24;

var s: longint;

i: integer;

begin

s:=0; i:=0;

while s<=200 do

begin

s:=s+i;

i:=i+2;

end;

write('S= ',s);

readln

end.

Bình luận (0)

Các câu hỏi tương tự
TN
Xem chi tiết
H24
Xem chi tiết
H24
Xem chi tiết
PT
Xem chi tiết
NH
Xem chi tiết
NH
Xem chi tiết
NH
Xem chi tiết
NH
Xem chi tiết
NH
Xem chi tiết