Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Помогите решить!

Автор: trerum 23.10.2007 20:58

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

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

Автор: Артемий 23.10.2007 21:03

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

Автор: trerum 24.10.2007 0:10

Массив

Автор: Sozialist 24.10.2007 2:29

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


1)

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


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