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

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Ba chú heo con

Program tong_so_le;

Uses crt;

Var S,N,I:Integer;

Xữa chương trình sau( nếu sai)

Begin

Clrscr;

Write('Nhap N ');Readln(N);

S:=0;

For I:=1 to N do If (I mod 2<>0) then

S:=S+I;

Writeln('Tong cac so le la ',S); Readln;

End.

Giup mik nha các bn

Thanks


Các câu hỏi tương tự
NHÓC BOSS GAMING
Xem chi tiết
Ho Truong Minh
Xem chi tiết
Cold Wind
Xem chi tiết
Nguyễn Minh Lệ
Xem chi tiết
Minh Lệ
Xem chi tiết
sunion Ghast
Xem chi tiết
nothing
Xem chi tiết
Mikan Sakura
Xem chi tiết
Nguyễn Trần Tuấn Anh
Xem chi tiết