Определитель, сколько элементов массива А равны заданному значению Х.

Определитель, сколько элементов массива А равны заданному значению Х.
Гость
Ответ(ы) на вопрос:
Гость
var x,i,k: integer; a: array [1..10] of integer; beginwriteln ('vvedi x');read (x);for i:=1 to 10 do begin read (a[i]);  if a[i]=1 then x:=x+1;  end;  writeln ('edinice=',x,' elements'); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы