Bài 6. Câu lệnh điều kiện

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Nguyễn Đăng Trường

viết chương trình tính tổng các số chẵn từ 1 đến 100 ( mình chưa học lệnh while ạ nên xin mn đừng dùng lệnh while )

Nguyễn Lê Phước Thịnh
8 tháng 5 2020 lúc 12:38

uses crt;

var i,t:integer;

begin

clrscr;

t:=0;

for i:=1 to 100 do

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

writeln('Tong cac so chan tu 1 den 100 la: ',t);

readln;

end.


Các câu hỏi tương tự
Phuong Pham
Xem chi tiết
Snsbbdbd Xnxb
Xem chi tiết
Tam Be
Xem chi tiết
Huy Tùng Vũ
Xem chi tiết
Khoi Quach
Xem chi tiết
LQmobi Acc
Xem chi tiết
Sonyeondan Bangtan
Xem chi tiết
Ngô Thị Thùy Trang
Xem chi tiết
vũ thành đông
Xem chi tiết