Tin học Viết giải thuật tính tổng

[Thị Kim Sa]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Viết giải thuật Tính tổng n số S= A1+A2+A3+...+An, với n và số hạng Ai được nhập từ bàn phím. Thực hiện việc tính tổng các số Ai này và in kết quả của tổng tính được

 

[Sơn Nguyên 05]

Viết giải thuật Tính tổng n số S= A1+A2+A3+...+An, với n và số hạng Ai được nhập từ bàn phím. Thực hiện việc tính tổng các số Ai này và in kết quả của tổng tính được

Bạn tham khảo ở link dưới nhé!
https://diendan.hocmai.vn/threads/giai-thuat-toan.342733/

 

[Thị Kim Sa]

Bạn tham khảo ở link dưới nhé!
https://diendan.hocmai.vn/threads/giai-thuat-toan.342733/

S mình kh thấy

 

[Trâm Nguyễn Thị Ngọc]

Viết giải thuật Tính tổng n số S= A1+A2+A3+...+An, với n và số hạng Ai được nhập từ bàn phím. Thực hiện việc tính tổng các số Ai này và in kết quả của tổng tính được

Thuật toán:
B1. S <--- 0; i <--- 0.
B2. i <--- i + 1.
B3. Nếu i > N thì thông báo S rồi kết thúc.
B4. S <--- S + A_i.
B5. Quay lại B2.
Nếu bạn cần viết chương trình thì CODE đây:

Var
  N,i,t:integer;
Begin
 Write('nhap vao so pt:');readln(n);
 T:=0;
 For i:=1 to n do
    T:=t+a[i];
  Write(t);
 Readln
End.

 

[nguyen tran thanh nha]

Thuật toán:
B1. S <--- 0; i <--- 0.
B2. i <--- i + 1.
B3. Nếu i > N thì thông báo S rồi kết thúc.
B4. S <--- S + A_i.
B5. Quay lại B2.
Nếu bạn cần viết chương trình thì CODE đây:

Var
  N,i,t:integer;
Begin
 Write('nhap vao so pt:');readln(n);
 T:=0;
 For i:=1 to n do
    T:=t+a[i];
  Write(t);
 Readln
End.

bạn thiếu ban đầu phải nhập n và giữa b2 với b4 là phải có nhập ai nữa

 

[Trâm Nguyễn Thị Ngọc]

bạn thiếu ban đầu phải nhập n và giữa b2 với b4 là phải có nhập ai nữa

Mình cũng chẳng biết nữa, về phần viết thuật toán thì mình tệ lắm

 

[nguyen tran thanh nha]

Mình cũng chẳng biết nữa, về phần viết thuật toán thì mình tệ lắm

mình cũng thế thôi. mình toàn bị trừ điểm do thuật toán không. đắng lòng