Помогите решить задачу...

Chadik · 16 янв 2010

Помогите решить задачу на паскале))Задано целое числ Х и массив случайных чисел А.
Определить, сколько раз число Х входит в массив А.

Artemida · 16 янв 2010

Program gfgd;
var: i,x,n,k:integer;
begin
readln(x);
readln(a);
for i:=1 to n do
if a=x then k:=k+1;
writeln(k);
end.