VPF::[Pascal] Массивы, Сортировка - Форум программистов

KoLobok

Дата 11.12.2006, 18:07 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 6
Регистрация: 11.12.2006

Репутация: нет
Всего: нет

Народ помогите плиззззз... Три задачки smile

1. Дан одномерный числовой массив, упорядоченный по возрастанию размером N и число X. Вставить X в массив, чтобы он сохранил упорядоченность. Дополнительного массива не заводить.

2. Дан массив A[N]. Преобразовать массив A[N] по следующему правилу (воспользовавшись вспомогательным массивом) по следующему правилу: все отрицательные элементы массива A[N] перенести в его начало, а все остальные – в конец, сохраняя исходное взаимное расположение как среди отрицательных, так и среди остальных элементов.

3. Напишите программу сортировки элементов массива A[N] по возрастанию методом пузырька

M
alexeis1

Модератор: Пожалуйста, один топик - один вопрос.

Это сообщение отредактировал(а) alexeis1 - 12.12.2006, 00:38

Rodman

Дата 11.12.2006, 19:15 (ссылка)

(нет голосов)

Загрузка ...

CIO

Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

Репутация: 26
Всего: 122

Цитата(KoLobok @ 11.12.2006, 17:07

)

. Напишите программу сортировки элементов массива A[N] по возрастанию методом пузырька

Код


for p:=1 to n do
    for k:=1 to n-j do
        if f[k,1]>f[k+1,1] then
            for l:=1 to n do 
              begin
                  f[k,l]:=f[k,l]+f[k+1,l]; {a=a+b}
                  f[k+1,l]:=f[k,l]-f[k+1,l]; {b=a}
                  f[k,l]:=f[k,l]-f[k+1,l]; {a=b}
               end;

--------------------

CRM с функцией АвтоОбзвона

Лотереи мира

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Центр помощи \| Следующая тема »