Пожалуйста!) напишите программу которая вычисляет сколько раз введенное с клавиатуры...

Question

Пожалуйста!) напишите программу которая вычисляет сколько раз введенное с клавиатуры число встречается в массиве ( в pascal)

Answer 1

Пусть массив находится под переменной A и состоит из 10 ячеек. А число с клавиатуры N. Переменная x будет выступать в роли счетчика.

x:=0;

for i:=1 to 10 do if a[i]=n then x:=x+1;

writeln("Число совпадает",x,"раз");