Viết thuật toán nhập vào số n tính tổng các số từ 1 đến n

0 bình luận về “Viết thuật toán nhập vào số n tính tổng các số từ 1 đến n”

1. Program tinhtong;

   Uses crt;

   Var i,n,s : real;

   Begin

   Write(‘ nhap so n’,n);

   Readln(n);

   For i:=1 to n do

   I:=i+1;

   S:=0;

   S:=s+i;

   End;

   Write(‘ tong cua cac so tu 1 den n la’, S);

   Readln

   End.

   Thuật toán

   I: cho biết n

   O : tính tổng từ 1 đến n

   Bước 1 : nhập số n

   Bước 2 : sử dùng vòng lặp For to do để tính tổng từ 1 đến N

   Bước 3 : In kết quả ra màn hình

   Bước 4 kết thúc chương trình

   Bình luận

2. -Bước 1: Nhập số N.

   -Bước 2: i<---1; Tong<---0;

   -Bước 3: i>N thì in ra tổng và kết thúc.

   -Bước 4: Tong<---Tong+i;

   -Bước 5: i<---i+1, quay lại bước 3.

   Bình luận