Sử dụng biến mảng viết chưa trình nhập vào một dãy số gồm N số nguyên từ bàn phím in ra màn hình tổng các số dương trong dãy số đó. cứu mình huhu

lephandung001

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 19 xem

1 trả lời

Thích Trả lời

thuynguyenbien55

program tong_duong;

uses crt;

var A:array[1..1000] of integer;

n,i,t:integer;

begin

clrscr;

write('Nhap N: '); readln(n);

t:=0;

for i:=1 to n do

begin

write('Nhap so thu ',i,': '); readln(A[i]);

if A[i]>0 then t:=t+A[i];

end;

write('Tong cac so duong la: ',t);

readln;

end.

Vote (0) Phản hồi (0) 2 năm trước

thuytrinh2660

uses crt;

var a: array[1..100] of integer;

i,n,s: integer;

begin

clrscr;

write('nhap n: '); readln(n);

for i:=1 to n do

begin

write('nhap PT thu ',i,': '); readln(a[i]);

if a[i]>0 then s:=s+a[i];

end;

write('tong cac so duong trong day la: ',s);

readln;

end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

Tác hại của tiếng ; Cách làm giảm tiếng ồn .

cần người vẽ lại NL: có ai cho xin vài chuyện ngôn và chuyển sinh ko để mình ngồi đọc cho đỡ chán

suy nghĩ của e về đại dịch COVID hiện nay "ngắn thoi nhé ko cần dài"

đơn thúc âm 1/3xy^3 z^4 có bậc là

Câu 1: một vật có khối lượng 0,2kg được ném thẳng đứng lên cao với vận tốc ban đầu 10m/s từ độ cao 1m so với mặt đất. Lấy g=10m/s^2. Bỏ qua sức cản của không khí. Chọn gốc thế năng là mặt đất. Xác định độ cao của vật khi động năng bằng thế năng. Câu 2: một thước thép ở 30°C có độ dài 1500mm. Khi nhiệt độ tăng lên 80°C thì thước thép dài thêm bao nhiêu? Biết hệ số nở dài của thép là 11.10-6 K-1 Ai giải được mình vote 5*

Lấy một số dẫn chứng cho câu tục ngữ “Học, học nữa, học mãi” ( Nhớ phân tích ra nhé )

thức ăn vật nuôi là gì? kể tên các thành phần dinh dưỡng có trong thức ăn vật nuôi?

Anh chị giúp em : 1/5 của 60 là bao nhiêu

câu2: các cuộc khỡi nghĩa của Phan Bá Vành,Nông Văn Vân, Lê Văn Khôi,Cao Bá Quát chứng tỏ gì? câu3: cấc cuộc khởi nghĩa trên cs gì giống nhau?

1. một cửa hàng có 8 thùng dầu chứa 4800 lít dầu. Hỏi 6 thùng dầu chứa bao nhiêu lít dầu? Biết số lít dầu trong mỗi thùng như nhau 2. một hình chữ nhật có chiều dài là 16cm, chều rộng bằng 1/2 chiều dàI. Tính diện tích hình chữ nhật đó

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến