Chương trình đơn giản

Trần Thị Hương Ly

viết chương trình đọc từ tệp BAITAP.INP hai số nguyên a,b (a<b).

in ra màn hình tổng các số chẵn trong phạm vi từ a đến b

 

Nguyễn Lê Phước Thịnh
2 tháng 5 2021 lúc 22:23

uses crt;

const fi='baitap.inp'

var f1:text;

a,b,i,t:integer;

begin

clrscr;

assign(f1,fi); reset(f1);

readln(f1,a,b);

t:=0;

for i:=a to b do 

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

writeln(t);

close(f1);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
bùi nguyễn huyhoang
Xem chi tiết
Thái Bảo
Xem chi tiết
Bảo Văn
Xem chi tiết
Hà Phương
Xem chi tiết
Hoàng lĩnh
Xem chi tiết
Ngạn Tuấn
Xem chi tiết
Bi Bi
Xem chi tiết
Nguyễn Thị Tươi
Xem chi tiết
Nam Phạm An
Xem chi tiết