Tìm kiếm
 
 

Display results as :
 


Rechercher Advanced Search

Affiliates
free forum


Câu lệnh lặp - chương trình tính tổng

Xem chủ đề cũ hơn Xem chủ đề mới hơn Go down

Câu lệnh lặp - chương trình tính tổng

Bài gửi  Admin on 23/1/2010, 1:15 am

Program tinh_tong;
Uses CRT;
Var S,i,n: integer;
Begin
Clrscr;
Write('Nhap so N = ');
Readln(n);
S:=0;
For i := 1 to n do S:=S+i;
Writeln('Tong tu 1 den ',n,'la : ',S);
Readln
End.

Admin
Admin

Tổng số bài gửi : 31
Points : 83
Reputation : 0
Join date : 16/10/2009

Xem lý lịch thành viên http://chuvanan.lightbb.com

Về Đầu Trang Go down

Xem chủ đề cũ hơn Xem chủ đề mới hơn Về Đầu Trang


 
Permissions in this forum:
Bạn không có quyền trả lời bài viết