Bài 7. Câu lênh lặp

H24

viết chương trình in ra màn hình tính tổng các số chẵn có trong dãy số từ 0 đến n (n được nhập từ bàn phím)

NT
21 tháng 2 2023 lúc 15:38

uses crt;

var n,i,t:integer;

begin

clrscr;

readln(n);

t:=0;

for i:=1 to n do

if i mod 2=0 then t:=t+i;

write(t);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
BT
Xem chi tiết
H24
Xem chi tiết
PK
Xem chi tiết
NN
Xem chi tiết
LP
Xem chi tiết
BT
Xem chi tiết
H24
Xem chi tiết
H0
Xem chi tiết
NS
Xem chi tiết