viết thuật toán cho một dãy A gồm N<=250 số nguyêna1, a2, ...aN hãy đếm số lượng các số chia cho 5 dư 3 trong dãy số đó?

#include<bits/stdc++.h>
using namespace std;
int main()
{
    int N,samon247=250,total=0;
    cout<<"Nhap N: ";
    cin>>N;
    if(N>samon247){
        return 0;
    }
    int arr[N];
    cout<<"Nhap Mang: ";
    for(int i=0;i<N;i++){
        cin>>arr[i];
        if(arr[i]%5==3){
            total++;
        }
    }
    cout<<"So luong cac so chia 5 du 3 trong mang la: "<<total;
}

uses crt;

var a : array[1..250] of integer;
n , i ,d :integer;
begin clrscr;
d:=0;
write('Nhap n :'); readln(n);
for i:=1 to n do begin
write('Nhap a[',i,']='); readln(a[i]);
end;
for i:=1 to n do if a[i] mod 5 = 3 then d:=d+1;
write(d);
readln
end.