Giúp em về tìm vị trí trog mảng 1 chiều với ạ tin 11?

USES crt;

VAR A: ARRAY[1..100] OF BYTE;

i,dem,so,x: BYTE;

BEGIN

clrscr;

write('Nhap vao 1 so x');

readln(x);

write('Ban muon nhap bao nhieu phan tu cho mang A: ');

readln(so);

dem:=0;

FOR i:=1 TO so DO

BEGIN

write('A[',i,']= ');

readln(A[i]);

IF a[i]= x THEN dem:= dem+1;

END;

IF dem = 0 THEN writeln('so ',x,' khong nam trong day') ELSE

writeln('trong mang A co ',dem,' so trung voi so ',x);

readln;

END.

Bác ơi tin 11 dùng PASCAL. Lệnh thế hình như sai rồi.

Tham khảo nha. có thể sai:

code

#include<stdio.h>

#include<conio.h>

#define max 100

void nhapn(int &n)

{

do{

printf("\nNhap so phan tu:");

scanf("%d",&n);

if(n<=0 || n>=10)

printf("Nhap sai . Nhap lai");

}while(n<=0 || n>=10);

}

/*---------------------------------------------------*/

void nhapmang(int a[],int n)

{

for(int i=0;i<n;i++)

{

printf("Nhap gia tri phan tu a[%d]:",i);

scanf("%d",&a[i]);

}

}

/*---------------------------------------------------*/

void xuatmang(int a[],int n)

{

printf("So phan tu la:");

for(int i=0;i<n;i++)

printf("%4d",a[i]);

}

/*---------------------------------------------------*/

int timvtcuaptu(int a[],int n,int x)

{ int flag=0;

for(int i=0;i<n;i++)

if(a[i]==x)

return i;

printf("số lượng pt: %d", flag+1)

return -1;

}

kiem tra flag giúp minh nha