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 56 Output 5
2 câu trả lời
#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;
}
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.