Question

Дан массив из десяти целых чисел. Определите, сколько элементов этого массива имеют минимальное значение!!!(именно минимальное) составить...

Answer 1

//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)

begin
  var a:=ReadArrInteger(10); 
  Println('Количество минимальных:',a.Where(t->t=a.Min).Count)
end.

Пример:
1 4 5 1 3 4 7 1 5 2
Количество минимальных: 3 

Answer 2

Потом считаете сколько элементов равны минимальному

Answer 3

Спасибо огромное!!!…

Answer 4

for i:=1 to 10 do

Answer 5

if a[i]=min then count:=count+1;

Answer 6

Вот так