Viết chương trình nhập vào từ bàn phím một dãy số Nguyên A gồm n phần tử A1,A2,....,An. Hãy tính tổng các số chẵn có giác trị lớn hơn 0 vừa in kết quả ra màn hình

1068147926867528

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 44 xem

1 trả lời

Thích Trả lời

lainguyenvankhanh

program tinhtong;

uses crt;

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

n,i:integer;

t:longint;

begin

clrscr;

write('Nhap so luong phan tu n: '); readln(n);

writeln('NHAP GIA TRI TUNG PHAN TU CUA DAY');

t:=0;

for i:=1 to n do

begin

write('A[',i,']= ');

readln(A[i]);

if (A[i]>0) and (A[i] mod 2=0) then t:=t+A[i];

end;

write('Tong cac so chan lon hon 0 trong day la: ',t);

readln

end.

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

khuynnguyen23

uses crt;
var i,n,s:integer;
a:array[0..100] of integer;
BEGIN
clrscr;
write('Nhap n:'); readln(n);
for i:=1 to n do
begin
write('Nhap a[',i,']');
readln(a[i]);
end;
s:=0;
for i:=1 to n do
if (a[i]>0) and (a[i] mod 2=0) then
inc(s,a[i]);
write('Tong cac so chan lon hon 0 trong day so tren la:',s);
readln
END.

Chúc bạn học tốt.

Cho mik xin ctlhn.

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

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

Vẽ chibi or anime xấu = bc hóng các idol :>

bài 1: Một thửa ruộng hình chữ nhật có chu vi là 560 m, chiều rộng bằng 3/4 chiều dài. Người ta trồng lúa, trung bình cứ 1m vuông tha hoạch được 1/2 kg thóc. Hỏi cả thửa ruộng đó người ta thu được bao nhiêu tạ thóc

Fill in the gaps with the woerbs in brackets I like ........(go) out with friends

Combine the sentenses using “too +adj + to V “: 7. He is very weak . He can’t sit up. ............................................................................................................................... 8. My father is quite short . He can’t become a basketball player. .............................................................................................................................. 9. The man is very poor. He can’t buy a bike for himself. .............................................................................................................. 10. The play was extremely boring. I can’t see it again.

cho hình thang ABCD 2 đáy AB, CD. biết AB = 7,5 cm, CD = 12 cm Gọi M là trung điểm của CD. E là giao của AM, BD. F là giao điểm BM, AC a, EF // AB b, nếu BC = 3cm. Tính DE Mk vẽ hình r nhs

Lan có 126000 đồng, Huệ có số tiền bằng 2/3 số tiền của Lan và bằng 3/4 số tiền của Hồng. Hỏi trung bình mỗi bạn có bao nhiêu tiền ?

Lập dàn ý cho đề:phân tích giá trị nhân đạo trong bài chiếc lược ngà của nguyễn quang sáng Giups e vs ạ e đang cần gấp

Mn ơi~ Lm hộ em sơ đồ tư duy về 3 trường hợp bằng nhau của tam giác vs ạ:> Hứa vote 5* cho câu tl hay Mơn mn nhìu<3

M.n vẽ giúp mik 1 trong 2 bức dưới nha vẽ = app nha

Nêu ý nghĩa tư sản Hà Lan và cách mạng Anh

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