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

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
你混過 vulnerable 他 難...

Viết chương trình nhập từ vào một số n bất kì từ bàn phím sau đó tính tổng từ 1 đến n

Help me ! Mik đg cần gấp . Thanks

Minh Nhân
3 tháng 5 2019 lúc 13:32

Program TinhTong;

Uses crt;

Var S,i,n:Integer; // Khai bao bien su dung

BEGIN

Write( ‘ Nhap so n:’ ); // Thong bao nhap lieu

Readln( n ); // Nhap gtri N, (voi &N la lay d/c bien N)

S: = 0; // Khoi gan gia tri ban dau cho S

For i:=1 to n do // Lap voi moi i co gia tri tu 1 den N

S:=S + i; // Tinh tong cong don i vao S

Writeln( ‘Tong = ’, S); // Xuat ket qua tong S ra man hinh

Readln;

END.


Các câu hỏi tương tự
Nguyễn Trần Thiên Bảo
Xem chi tiết
Nguyễn Trần Thiên Bảo
Xem chi tiết
Nguyễn Vũ
Xem chi tiết
Cao Cự Quân
Xem chi tiết
Trần Việt Long
Xem chi tiết
BAO LE DANH
Xem chi tiết
Nhân lê
Xem chi tiết
Dấu tên
Xem chi tiết
Tích Nguyệt
Xem chi tiết