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

2 câu trả lời

-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.

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

Câu hỏi trong lớp Xem thêm