В поиске не нашёл,если не трудно помогите или ссылку дайте:

1.Найти максимальный элемент и вставить после него 0
2.Удалить минимальный элемент
3.Удалить все элементы,равный первому

Может я не заметил - елемент чего?Матрица,массив,список?..

Массив

Алгоритм:
За 1 просмотр находишь нужный элемент, за второй выполняешь нужные действия.


1)

max:=a[1];
for i:=2 to m-1 {посл элемент} do
  if a[i] < a[i+1] then max:=a[i+1]

Остальное аналогично.