Tìm kiếm
Latest topics
Affiliates
Câu lệnh lặp - chương trình tính tổng
Trang 1 trong tổng số 1 trang
Câu lệnh lặp - chương trình tính tổng
Admin 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.
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 -
Similar topicsTrang 1 trong tổng số 1 trang
Permissions in this forum:
Bạn không có quyền trả lời bài viết|
|
|
» cau lenh lap
» Thuật toán Pascal
» Cách sử dụng GHOST
» Đề thi chuyên Tin Lê Quý Đôn [Hot ]
» HỌC VÀ HÀNH
» Học Cùng Bi-hỗ trợ học Tiếng Anh lớp 6, 7, 8, 9 theo SGK hiệu quả nhất!!!
» Bàn về bài thơ " Bếp lửa" - Bằng Việt
» Dạng câu hỏi cảm thụ văn học - Ngữ văn 8