Tìm kiếm
Latest topics
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
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.
Trang 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
|
|
13/4/2011, 6:15 pm by Admin
» cau lenh lap
3/9/2010, 4:24 am by Admin
» Thuật toán Pascal
20/7/2010, 6:22 am by whitelion244
» Cách sử dụng GHOST
20/7/2010, 6:16 am by whitelion244
» Đề thi chuyên Tin Lê Quý Đôn [Hot ]
20/7/2010, 6:14 am by whitelion244
» HỌC VÀ HÀNH
24/3/2010, 1:49 am by ngochinh
» 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!!!
23/2/2010, 12:53 am by ta6789
» Bàn về bài thơ " Bếp lửa" - Bằng Việt
25/1/2010, 8:49 pm by bui le
» Dạng câu hỏi cảm thụ văn học - Ngữ văn 8
23/1/2010, 4:03 pm by bui le