Hãy mô tả thuật toán tính tổng các số dương trong dãy số A = {a1, a2,..., an} cho trước.

Input :n,dãy A Output: Tổng A( điều kiện phần tử A>= 0) B1: Nhập n B2: Nhập các phần tử B3:Xét a1;a2;a3;...an >= 0 Nếu phần tử nào dương thì chuyển qua một danh sách B4 S-< a1,a2,...an; B5: Kết thúc thuật toán