Bài 6: Giải bài toán trên máy tính

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Như Quỳnh

tính tổng dãy số S= 1,2,3,.........N bằng cách liệt kê

Đẹp Trai Trọng
16 tháng 9 2019 lúc 21:02

uses crt;

var i,n,s:longint;

begin

clrscr;

readln(n);

for i:=1 to n do

s:=s+i;

write('Tong:',s);

readln

end.


Các câu hỏi tương tự
Lyy Pguong
Xem chi tiết
Tat Đạt
Xem chi tiết
Hisoka 226
Xem chi tiết
Vanhai Nguyen
Xem chi tiết
Ngọc Hiền
Xem chi tiết
Trân Tăng
Xem chi tiết
Lâm Khánh Linh
Xem chi tiết
_zerotwo00_
Xem chi tiết
Mai Nguyen Thi
Xem chi tiết