Lương Ngọc Anh

Viết phương trình nhập vào một mảng gồm N số nguyên và số nguyên K, đếm xem trong mảng có bao nhiêu phần tử bằng số nguyên K và in ra màn hình

Minh Lệ
1 tháng 3 2023 lúc 13:36

Program HOC24;

var i,d,n: integer;

a: array[1..32000] of integer;

begin

write('Nhap N: '); readln(n);

for i:=1 to n do

begin

write('a[',i,']='); readln(a[i]);

end;

write('Nhap k: '); readln(k);

d:=0;

for i:=1 to n do if a[i]=k then d:=d+1;

write('Co ',d,' phan tu bang ',k);

readln

end.

Bình luận (0)

Các câu hỏi tương tự
ღ๖ۣۜTɦùү ๖ۣۜDυηɠღ
Xem chi tiết
Nguyễn tiên
Xem chi tiết
ngomanhcuong
Xem chi tiết
Diễm Phạm Thị Hồng
Xem chi tiết
An Thuyên Đỗ
Xem chi tiết
Danh Nguyễn
Xem chi tiết
Dương Mạnh Hoàng
Xem chi tiết
Huy Hoàng Phạm
Xem chi tiết
Quân Gaming TV
Xem chi tiết