Tin học viết chương trình nhập vào từ bàn phím số nguyên dương M,N (N<-100) và dãy số A1,A2,..An .Đếm xem có bao nhiêu phần tử trong mảng = số M và hiển thị k 23/07/2021 By Melody viết chương trình nhập vào từ bàn phím số nguyên dương M,N (N<-100) và dãy số A1,A2,..An .Đếm xem có bao nhiêu phần tử trong mảng = số M và hiển thị kết quả lên màn hình Mn giúp mk giải bài này với ạ mk đang cần gấp
program demsoluong; uses crt; var A:array[1..100] of integer; m,n,i,d:integer; begin clrscr; write(‘Nhap M: ‘); readln(m); write(‘Nhap so luong phan tu N: ‘); readln(n); d:=0; for i:=1 to n do begin write(‘A[‘,i,’]= ‘); readln(A[i]); if A[i]=m then d:=d+1; end; write(‘Trong day A co ‘,d,’ phan tu bang ‘,m); readln; end. Trả lời