Nhập vào một dãy n số nguyên A1,A2,...,An Với (n<=10000 và Ai<=10^7 ). Đọc ra màn hình các thông tin sau: 1. Số lượng các số chẵn và tổng của các số chẵn. 2. Chỉ số của số hạng dương đầu tiên của dãy

1 câu trả lời

1.

sum:=0; dem:=0;
for i:=1 to n do

if (a[i] mod 2 = 0) then 

         begin

            sum:=sum+a[i];

            dem:=dem+1;

          end;

write(dem,' ',sum);

2.  

for i:=n downto 1 do

if (a[i] > 0) vt:=i;

write(vt);
3.
Phần khai báo và nhập bạn tự viết nha + Nhớ cho mình 5 sao + 1 <3 + câu trả lời hay nhất nha = ))

Câu hỏi trong lớp Xem thêm