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ố c

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

0 bình luận về “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ố c”

  1. 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 = ))

    Bình luận

Viết một bình luận