helpppp – Trong Pascal nhập vào một dãy số nguyên K – In ra màn hình xem có bao nhiêu số chẵn trong dãy số nguyên X Input N=10 2 5 7 9 8 10 4 65 89

0 bình luận về “helpppp – Trong Pascal nhập vào một dãy số nguyên K – In ra màn hình xem có bao nhiêu số chẵn trong dãy số nguyên X Input N=10 2 5 7 9 8 10 4 65 89”

1. Var i,n,d : Integer;
   a: array[1..100] of integer;
   Begin
   Readln(n);d:=0;
   For i:= 1 to n do
   Read(a[i]);
   For i := 1 to n do
   If a[i] mod 2 = 0 then d:= d+1;
   Writeln(d);
   End.

   Bình luận

2. #include <bits/stdc++.h>
   using namespace std;
   int main() {
       int n,b,chan=0,a=0;
       cin>>n;
       while(a<n){
           cin>>b;
           if(b%2==0){
               chan++;
           }
           a++;
       }
       cout<<chan;
       //samon247
       return 0;
   }

   Bình luận