Question

hãy mô tả thuật toán tính tổng các số dương trong dãy số A=\(\left\{a_1,q_2,.........,a_n\right\}\)

mn viết ra cho mk như chương trình free pascal nhoa

mk yeu mn nhìu

Answer 1

* Thuật toán:

Bước 1: Nhập n và dãy số a₁, a₂…, a_n.

Bước 2: SUM ← 0; i ← 0.

Bước 3: Nếu a_i > 0 thì SUM ← SUM + a_i, ngược lại đến bước 4.

Bước 4: i ← i + 1;

Bước 5: Nếu i \(\le\) n thì quay lại bước 3.

Bước 6: Thông báo giá trị SUM. Kết thúc thuật toán.

* Chương trình: program tinhtong; uses crt; var a,n,i: integer; sum: real; begin clrscr; write('Nhap n vao'), read(n); write('nhap day A vao'), read(a1,a2,...,an); sum:=0, i:=0; if i <= n then if ai > 0 then sum:=sum+ai else i:i+1; writeln('tong cac so duong trong day la',sum:4:0) readln end. Theo mình thì ntn

Answer 2

1GP cho bạn nào trả lời được câu này

Answer 3

input:dãy số A={a₁,.......,a_n}

output:tổng các số dương dương trong dãy A

thuật toán để mình suy nghĩ ,tối mình làm .minhf ôn bài chiều thi nữa

Nguyễn Nhật Minh câu kia để tối mình làm thử chiều phải thi sử nữa