LƯU BÀI LƯU BÀI ĐÚNG TÊN, ĐÚNG THƯ MỤC, Ổ ĐĨA. TỔNG 10.0 ĐIỂM ĐỀ...

6. Lưu bài Lưu bài đúng tên, đúng thư mục, ổ đĩa. Tổng 10.0 Điểm

ĐỀ BÀI - 01

Viết chương trình tính S:=1+2+3+...n. Với n được nhập từ bàn phím. Tính tổng các số tự nhiên đầu tiên từ 1n (n>0). Chương trình khi chạy có giao diện như sau: Cho biet so n: 5 Tong cac so tu 1 den 5 la : 15

ĐÁP ÁN – ĐỀ 01

 Chương trình được viết bằng ngôn ngữ Free Pascal như sau: Program Tinh_tong; Uses crt; Var i,n,s:integer; Begin Clrscr; Write(‘Cho biet so n:’); Readln(n); S:=0; For i:=1 To n Do S:=S+i; Write(‘Tong cac so tu 1 den ‘,n,‘ la:’,S); Readln; End. (Học sinh có thể viết bằng lệnh lặp While...Do với thuật toán bất kì nếu cho kết quả đúng thì vẫn tính điểm Trên chỉ là chương trình đơn giản để tham khảo!)