Ôn tập cuối năm

Phạm Anh Thư

Viết chương trình tính tổng sau: s=2+4+6+8+...+n

Nguyễn acc 2
9 tháng 3 2022 lúc 9:25

refer:

uses crt;

var s,i,n:integer;

begin

clrscr;

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

s:=0;

for i:=0 to n do

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

writeln('S=',s);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
Phạm Anh Thư
Xem chi tiết
Thảo Nguyễn Thị Kim
Xem chi tiết
Mạc Kỳ Nhi
Xem chi tiết
thư lê
Xem chi tiết
Huỳnh Vương Ngọc Phúc
Xem chi tiết
Đỗ Trọng TÍn
Xem chi tiết
Hoan Lý
Xem chi tiết
Phạm Hữu Đức
Xem chi tiết
Quốc thuận Lê
Xem chi tiết