TT

viết phương trình đếm số lần xuất hiện của giá trị X trong mảng dãy số nguyên

help mee

NP
24 tháng 5 2021 lúc 11:06

program tinh_so_lan_xuat_hien;

uses crt;

var i,n,x,d:integer;

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

begin

clrscr;

write('nhap n:');readln(n);

for i:=1 to n do

begin

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

end;

d:=0;

write('nhap x:');readln(x);

for i:=1 to n do

if x=a[i] then inc(d);

writeln(x,' xuat hien ',d,' lan trong mang a');

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
NY
Xem chi tiết
MY
Xem chi tiết
TM
Xem chi tiết
MT
Xem chi tiết
H24
Xem chi tiết
HT
Xem chi tiết
TD
Xem chi tiết
AD
Xem chi tiết
TM
Xem chi tiết