Lập trình đơn giản

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Nguyễn Trần Thiên Bảo

Em hãy viết chương trình tính tổng các số chẵn từ 1 đến N trong đó N là số được nhập từ bàn phím (N<=100)

Nguyễn Lê Phước Thịnh
22 tháng 4 2021 lúc 21:29

uses crt;

var i,n,t:integer;

begin

clrscr;

write('nhap n='); readln(n);

t:=0;

for i:=1 to n do 

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

writeln(t);

readln;

end.


Các câu hỏi tương tự
Nguyễn Trần Thiên Bảo
Xem chi tiết
Trần Việt Long
Xem chi tiết
Tuyết Lê
Xem chi tiết
Cao Cự Quân
Xem chi tiết
BAO LE DANH
Xem chi tiết
Nhân lê
Xem chi tiết
Yeu DUong nhat
Xem chi tiết
Lê Xuân Hoa
Xem chi tiết
dinhnguyentuhuy
Xem chi tiết