Блог « WordPress.com Tag Feed

Маленький юбілей

grandse — Sun, 13 Jul 2008 21:42:35 +0000

Першу замітку в цьому блозі було написано шість місяців тому. А саме 14 січня. Тоді я написав аж цілих три "статті". Потім були ще записи, потім мовчання.. Потім багато "проривів" коли писалось по декілька заміток на день, і перерви в тиждень. Ось так набралось вже більше 40 заміток, деякі зовсім маленькі, а деякі в декілька тисяч слів, з ілюстраціями. Коли як..

Сподіваюсь, що надалі мої думки сюди будуть потрапляти 2-3 рази на тиждень і що вони будуть комусь цікавими та необхідними.

Цікаво, а чи має цей блог хочаб декілька постійних читачів, окрім його авора звісно :). Прошу хоча б декілька слів написати всіх, хто не вперше бічить цей блог, хто хоча б іноді відкриває його перевіряючи на предмет нових заміток, чи помістив його в свій рідер. Буду дуже вдячний за ваші слова, відгуки, поради. Дякую всім за увагу.

4-hour workweek Тимоти Ферриса

Voeslav — Sun, 08 Jun 2008 19:24:17 +0000

Тимоти Феррис:

«Мои ладони снова вспотели.

Софиты слепили глаза. Уставившись в паркет, чтобы не ослепнуть, я подумал о том, что возможно являюсь одним из лучших в мире, только никому пока об этом не известно. Моя партнерша Алисия переступила с ноги на ногу; мы стояли в одном ряду ещё с девятью парами, отобранными из всего 1 000 участников от 29 стран и четырех континентов. Это был последний день полуфинала Мирового Чемпионата по Танго, и это было нашим финалом, проходящим перед судьями, телевизионными камерами, и приветствующими толпами. Все другие пары в среднем тренировались по 15 лет. Для нас же это была кульминация пяти месяцев безостановочных шестичасовых тренировок, и, наконец, шоутайм.

Читать статью полностью: Timothy Ferris, “The 4 hour workweek”

Видео выступления Тимоти Ферриса и его партнёрши Алисии Монти:

Переезд

dmych — Sat, 17 May 2008 16:18:46 +0000

Я (надеюсь, в последний раз) переезжаю на новую площадку.

Мой новый сайт: http://oramezo.org/. Добро пожаловать!

С нови дрехи на ново място

Stefan Stoilov — Fri, 16 May 2008 22:42:19 +0000

От днес личния ми дневник се хоства от wordpress.com Дано си допаднем !

Как меня находят

brialius — Tue, 13 May 2008 13:00:19 +0000

Ссылки на себя поискал тут на досуге..

Сразу поясню, что первые 2 буквы означают язык блогов.

bg.wordpress.com/tag/Жизнь/ - Жизнь и авто по болгарски

bg.wordpress.com/tag/Авто/

es.wordpress.com/tag/Любовь/ - Любовь по испанки

fr.wordpress.com/tag/Блог/ - Блог по французски и итальянски

это ваще хз что за языки..

it.wordpress.com/tag/Блог/

fa.wordpress.com/tag/Блог/

pt.wordpress.com/tag/Блог/2/

ca.wordpress.com/tag/Кино/

Какой интернациональный у меня блог оказывается :) Хоть бы одна ссылка на русские тэги была :)

Wordpress.com 1-сағат демалды

huanysh — Sun, 11 May 2008 08:57:56 +0000

Таңңертен (Алматы уақыты бойынша) Wordpress.com 1-сағат демалды. Яғни блогымда істедемеді. Бір қызық екен.

Бірақ Wordpress.org өз жұмысын атқарып отырды.

[gallery]

Қазақ тілінде сөйлейміз!!!

huanysh — Sat, 10 May 2008 22:13:34 +0000

Қаскелен қаласындағы Өрттен құтқару мекемесінің насихаты.

Осындай насихаттар мемлекеттің басқа мекемелерінде орын тауып жатса, десенші!!!

Emacs Muse - WYWIWYM для статей WP

dmych — Sat, 10 May 2008 12:26:40 +0000

Онлайновый текстовый процессор, как на WordPress.com или Ipernity — это здорово, но не всегда есть возможность им воспользоваться. Я часто пишу и редактирую статьи для сайтов или блогов на карманном компьютере по дороге на работу или с работы. А на нем к моим услугам только примитивный текстовый процессор, который меня не устраивает совершенно, да несколько текстовых редакторов разной мощности. Так что по началу я редактировал HTML в Emacs'е. Некоторое время это меня устраивало, тем более, что в редакторе есть хорошая поддержка HTML - и синтаксическая подсветка, и быстрая вставка нужных тегов...

Но все-таки вычитывать и править текст, продираясь глазами сквозь многочисленные теги, не очень приятно. Да и вставлять эти теги руками быстро надоело. Хотелось такого же комфорта, как в текстовом процессоре — хотелось WYSIWYG-редактора. Я перепробовал разные варианты, но все забраковал. Странно даже, неужели нет ни одного WYSIWYG-редактора, который бы просто порождал код HTML без кучи ненужных стилей и прочего мусора? Чтобы если я выбираю стиль H1, в коде бы не появлялось кучи тегов типа «<h1 class="the-best-html-editor-header-one-style"><span style="color: 000000;">...» — неужели это так трудно?

Наконец, я вспомнил о таком замечательном изобретении, как разметка вики. С одной стороны, не надо загромождать текст тегами HTML, а с другой — форматирование и вёрстка производится просто вставкой нужных символов (например, чтобы выделить текст жирным, вместо <strong>таких тегов</strong> текст просто обрамляется **двойными звездочками**). А учитывая, что тот же EmacsWikiMode красиво и удобно выделяет шрифтами и цветом синтаксис вики, а также прячет часть символов разметки, работа с вики-текстом напоминает скорее работу в текстовом процессоре.

В конце концов, я остановился на Muse — более новом пакете, пришедшем на смену EmacsWiki. Правда, пришлось повозиться с настройкой пакета, чтобы он конвертировал вики-текст в HTML именно так, как надо для WordPress: во-первых, нужно удалить содержимое muse-html-header и muse-html-footer, а также muse-html-style-sheet, чтобы в результат не попадали разные <html><head>.... Потом нужно отключить auto-fill-mode в muse-mode-hook и вместо него добавить longlines-mode — это чтобы не было не нужных разрывов строк (который WordPress оставляет как есть). Последнее, что я сделал — это создал два проекта в muse-projects и настроил их.

Теперь я могу набирать текст в «почти WYSIWYG» (или WYSIWYM — What You See Is What You Mean) в своем любимом Emacs'е:

На десктопе могу даже видеть картинки:

После того, как пост или статья готовы, я нажимаю C-c C-t, загружаю получившийся HTML-файл в редактор WP и вношу окончательные коррективы (загружаю картинки и исправляю ссылки на них, выравниваю текст по ширине и т.п.).

Опубликована еще пара статей про Питон на Заурусе

dmych — Sat, 10 May 2008 11:28:16 +0000

Программирование на Питоне под Qtopia

dmych — Sat, 10 May 2008 11:18:00 +0000

Введение

Это небольшое введение в программирование на Питоне на Заурусе. Предполагается, что вы уже знакомы с языком Python, имеете представление о Qt и Qtopia, а также владеете навыками работы в командной строке и сможете заставить свой текстовый редактор правильно сохранять код программ на Питоне.

Здесь вы не найдете информацию о том:

как программировать на Питоне
как программировать с использованием Qt
как программировать под Заурус на C++

Эта работа посвящена вопросам написания и адаптации программ на Питоне для Зауруса с использованием библиотек Qt и Qtopia и расширения PyQt для Питона.

Сначала рекомендуется прочитать Jonathan Gardner's PyQt Tutorial (мой русский перевод)

Почему Питон?

Python - интерпретируемый объектно-ориентированный язык, позволяющий писать в высшей степени переносимые программы. Его синтаксис предельно прост, а возможности - просто огромны.

Вместе с кросс-платформенной библиотекой и набором инструментов Qt он позволяет создавать приложения, которые даже не надо перекомпилировать под каждую новую платформу.

Однако, в программировании для Зауруса есть свои нюансы. Прежде всего, желательно использовать не только саму Qt, но и ее вариант, созданный для мобильных устройств, Qtopia.

Требования

Вам потребуется установить Питон на свой Заурус. Также, если вы захотите проверить работоспособность кода на десктопе, вам потребуется также установить на ней Питон (не ниже версии 2.3), а также саму библиотеку Qt и библиотеку-"обертку" PyQt (в версии для Зауруса она поставляется "в комплекте").

О том, как установить Питон на Заурус см. статью Установка Питона на Заурусе.

Если ваш десктоп работает под управлением операционной системы Linux, Питон скорее всего у вас уже стоит. Проверить это можно набрав в командной строке python (выход - Ctrl-D). Однако, PyQt скорее всего придется устанавливать дополнительно.

Аналогично, Qt может уже стоять (особенно если вы используете KDE или какие-то программы из него).

Для других операционных систем вам скорее всего потребуется установить все три вещи.

Подробности см. на сайте http://www.python.org (найти дистрибутив для вашей ОС можно по адресу http://www.python.org/download/), http://www.trolltech.com/products/qt/index.html, http://www.qtopia.net/modules/developers/

Также вам нужен будет текстовый редактор, поддерживающий UTF-8 и пригодный для написания кода на Питоне. Одной из характерных черт этого языка является чувствительность к лидирующим пробелам в строках — их количество определяет вложенность операторов (служит операторными скобками). Поэтому неправильная работа редактора с пробелами и табуляциями может привести к трудноуловимым ошибкам в программе. Из всех имеющихся для Зауруса редакторов на мой взгляд лучше всего подходит Emacs. Этот редактор имеет замечательный режим для работы с программами на Питоне. Другой альтернативой является Vim.

Hello, Zaurus

Просто Qt

Итак, приступим. Создайте в редакторе файл hello.py со следующим содержанием:

[sourcecode language='python']
#!/usr/bin/python
import sys
from qt import *
app = QApplication(sys.argv)
label = QLabel(None, 'label')
label.setText("

Hello, Qt!

")
label.resize(QSize(300, 200))
app.setMainWidget(label)
label.show()
app.exec_loop()
[/sourcecode]

Прежде, чем запустить эту программу, рассмотрим по порядку каждую строчку.

Первая строка — стандартный заголовок, сообщающий командному интерпретатору где находится интерпретатор для данного языка.

Далее мы инпортируем модуль sys (откуда мы вызываем функцию, возвращающую список аргументов командной строки), в следующей строке мы импортируем главный модуль PyQt — библиотеки-"обертки", транслирующий наши запросы из Питона в саму Qt. Обратите внимание, что в отличие от C++, мы не импортируем отдельных модулей для каждого используемого виджета, а сразу все.

В четвертой строке мы создаем объект-приложение и передаем ему список параметров командной строки (Qt сама распознает некоторое количество параметров командной строки).

В трех следующих строках мы создаем и настраиваем текстовую метку, которая используется как главный виджет нашего приложения: сначала мы создаем соответствующий объект, потом задаем текст для него (обратите внимание, что для форматирования можно воспользоваться языком HTML — многие виджеты Qt "понимают" его), наконец, задаем размер.

Далее мы делаем метку центральным виджетом нашего приложения, отображаем ее и передаем управление в цикл обработки событий приложения (обратите внимание, что в Питоне слово "exec" является зарезервированным, поэтому в PyQt функция exec() назвается exec_loop()).

Особенности запуска из консоли

Вы можете запустить эту программу из консоли, набрав

python ./hello.py

или же сделайте его исполняемым командой chmod (я предпочитаю второй вариант). После запуска откроется окно нашего приложения, которое будет выглядеть примерно так:

Вы можете перемещать окно по экрану, распахивать его на весь экран, работает также системное меню (вызываемое щелчком на иконке Qt в левом верхнем углу), закрыть окно можно, как обычно, кнопкой с крестиком.

Однако будьте осторожны: если вы переключитесь сейчас на другое приложение (напимер, ткнете пером в окно консоли, видимое из-под окна "Hello, Zaurus", вы не сможете нормально продолжить работу с нашим приложением: Заурус переключится в режим "Magnified screen", что обычно в подобной ситуации приводит к отображению только белого экрана.

Но не пугайтесь. Достаточно любым доступным способом "убить" наше приложение:

открыть новую консоль нажатием Fn-N и выполнить команду killall python
или же запустить "System Info" и послать процессу hello.py сигнал "9: SIGKILL".

Такое поведение, по-видимому, связано с какой-то ошибкой в реализации консоли или самой Qtopia.

Обратите также внимание на отсутствие иконки для нашей программы в таскбаре — система по-видимому считает нашу программу подпроцессом консоли. Когда мы научимся запускать программы с рабочего стола, все встанет на свои места.

Qtpe — делаем приложение в стиле Qtopia

Однако, наше приложение пока не очень похоже на окошки Зауруса. Скорее оно выглядит как обычная программа для десктопа. Давайте займемся адаптацией его под Qtopia.

Много для этого делать не придется: вместо QApplication нужно использовать класс QPEApplication (импортируемый из модуля qtpe), кроме того, мы сразу изменим размер окна на 640x480, чтобы оно занимало весь экран (когда мы будем запускать эту программу с рабочего стола, размер ее окна автоматически будет изменяться таким образом, чтобы оно занимало всю площадь экрана, кроме таскбара).

File: helloqtopia.py

[sourcecode language='python']
#!/usr/bin/python
import sys
from qt import *
from qtpe import *
app = QPEApplication(sys.argv)
label = QLabel(None, 'label')
label.setText('

Hello, Zaurus!

')
label.resize(QSize(640, 480))
app.setMainWidget(label)
label.show()
app.exec_loop()
[/sourcecode]

Буквы PE в названиях модуля и класс означают "Palmtop Edition" и происходят от первоначального названия Кутопии (также как и название каталога QtPalmtop).

Когда вы запустите эту программу, вы увидите такое окно:

Обратите внимание на отсутствие курсивного выделения слова "Hello". Если вы уберете заголовочные теги вокруг надписи, то курсив снова "проявится". Видимо, это связано как-то либо с ошибками, либо с особенностями рендеринга HTML в Кутопии.

Запускаем везде!

Но тепеь при попытке запуска программы не на Заурусе, Питон будет жаловаться, что не может найти модуль qtpe, и не захочет выполнять программу дальше.

Тут нам на помощь придут обработка исключительных ситуаций в Питоне и преимущества динамической типизации (то, что в Питоне переменная сама по себе не связана типами или классами — в каждый момент времени она может принимать значение любого типа).

Более точно, мы будем перехватывать возникающую исключительную ситуацию, когда Питон не находит нужный нам модуль, и подменять один класс другим. Вот, как это делается:

File: helloqt.py

[sourcecode language='python']
#!/usr/bin/python
# -*- coding: utf-8 -*-

import sys
from qt import *
try: # перехватываем ошибку импорта
from qtpe import * # пытаемся импортировать
isQtopia = True # все в порядке
except:
isQtopia = False # ошибка - это не Qtopia
QPEApplication = QApplication # это будет один и тот же класс

app = QPEApplication(sys.argv)
label = QLabel(None, 'label')
label.setText('

Hello, Zaurus!

')
label.resize(QSize(640, 480))
app.setMainWidget(label)
label.show()
app.exec_loop()
[/sourcecode]

Комментарий во второй строке обрабатывается самим Питоном (также он используется Emacs'ом) — он указывает кодировку файла. Если ее не указать, то Питон будет ругаться на наши комментарии, написанные по-русски.

Переменная isQtopia может быть использована в дальнейшем, если в других местах программы потребуется узнать, где исполняется программа.

Цифровые часы

Возьмем теперь пример посложнее. Наша следующая программа будет основана на программе dclock.py из демонстрационных примеров PyQt. Если вы не понимаете, что и как делает эта программа, прочтите руководство по Qt. Вот ее адаптированный исходный текст:

File: dclock.py

[sourcecode language='python']
#!/usr/bin/python
# -*- coding: utf-8 -*-
# A port to PyQt of the dclock example from Qt v2.x.
# Версия, адаптированная для Qtopia

import sys, string
from qt import *
try:
from qtpe import *
isQtopia = True
except:
QPEApplication = QApplication
isQtopia = False

class DigitalClock(QLCDNumber):
def __init__(self, parent=None, name=None):
QLCDNumber.__init__(self, parent, name)
self.setCaption('Digital Clock')
self.showingColon = 0
if isQtopia:
black=QColor(0,0,0)
self.setBackgroundColor(black)
self.setFrameStyle(QFrame.Panel | QFrame.Raised)
self.setLineWidth(2)
self.showTime()
self.normalTimer = self.startTimer(500)
self.showDateTimer = -1

def timerEvent(self, e):
if e.timerId() == self.showDateTimer:
self.stopDate()
else:
if self.showDateTimer == -1:
self.showTime()

def mousePressEvent(self, e):
if e.button() == Qt.LeftButton:
self.showDate()

def showDate(self):
if self.showDateTimer != -1:
return
d = QDate.currentDate()
self.display('%2d %2d' % (d.month(), d.day()))
self.showDateTimer = self.startTimer(2000)

def stopDate(self):
self.killTimer(self.showDateTimer)
self.showDateTimer = -1
self.showTime()

def showTime(self):
self.showingColon = not self.showingColon
s = list(str(QTime.currentTime().toString())[:5]) #.left(5)
if not self.showingColon:
s[2] = ' '
if s[0] == '0':
s[0] = ' '
s = string.join(s,'')
self.display(s)

a = QPEApplication(sys.argv)
clock = DigitalClock()
clock.resize(170,80)
a.setMainWidget(clock)
clock.show()
a.exec_loop()
[/sourcecode]

Обратите внимание, как используется переменная isQtopia в конструкторе класса: на десктопе цвет часов останется по умолчанию (серым), в то время как на Заурусе часы будут на черном фоне.

Делаем ярлык на рабочем столе

Давайте, наконец, создадим иконку на рабочем столе Зауруса, чтобы запускать наши часы оттуда.

Есть по крайней мере два варианта, как это сделать:

положить файл dclock.py в каталог /home/QtPalmtop/bin и создать ярлык, указывающий на него, или
положить файл в любое место (например, в домашний каталог /home/zaurus), а в каталоге /home/QtPalmtop/bin создать символическую ссылку ("симлинк") на этот файл.

Я предпочитаю второй вариант, т.к. в этом случае мне не нужны права суперпользователя чтобы отредактировать файл, кроме того это удобнее, если программа состоит из нескольких файлов (модулей), что обычно для Питона. Чтобы не сваливать все их в /home/QtPalmtop/bin или возиться с настройкой переменной PYTHONPATH, я делаю лишь ссылку на главный запускаемый файл.

Давайте так и поступим:

скопируйте файл dclock.py в домашний каталог
сделайте его исполняемым: $ chmod +x ./dclock.py
станьте суперпользователем и перейдите в /home/QtPalmtop/bin:

 $ su
 # cd /home/QtPalmtop/bin

создайте симлинк на наш файл:

 /home/QtPalmtop/bin# ln -s /home/zaurus/dclock.py dclock

теперь откройте "Tab Settings" на закладке "Settings" рабочего стола
выберите в левой части окна подходящую закладку и создайте новый ярлык (кнопка с чистым листочком на панели внизу)
введите имя "Digital Clock", выберите иконку "Clock", введите имя программы "dclock"
сохраните изменения, нажимая "Ok"
перейдите на нужную закладку и снимите у созданной иконки флаг "Display with magnified screen" (почему-то все ярлыки создаются с этим флагом)

Voila! Нажимаем на ярлык и через несколько секунд наслаждаемся результатом:

Наше приложение занимает всю полезную площадь экрана, имеет иконку в панели задач, а также правильно масштабируется при повороте экрана.

Щелчок по окну вызывает краткосрочное переключение на отображение даты.

Главное меню

Давайте усовершенствуем наши часы: добавим меню с пунктами "About" и "Exit". На Заурусе меню может вызываться нажатием кнопки "Menu".

Для начала создадим новый класс, являющийся наследником QMainWindow. Добавьте следующий фрагмент кода после класса DigitalClock перед главной программой (начинающейся со строки "a = QPEApplication(sys.argv)"):

[sourcecode language='python']
class MainWindow(QMainWindow):
def __init__(self, parent=None):
QMainWindow.__init__(self, parent, '', 0)
self.setCaption('Digital Clock')
self.setCentralWidget(QWidget(self, "qt_central_widget"))
self.setupMainMenu()
mainFormLayout = QVBoxLayout(self.centralWidget(), 1, 2, "mainFormLayout")
self.clock = DigitalClock(self.centralWidget())
mainFormLayout.addWidget(self.clock)

def setupMainMenu(self):
self.actionAbout = QAction(self, "actionAbout")
self.actionAbout.setText("About Digital Clock")
self.actionAbout.setMenuText("&About")
self.actionExit = QAction(self, "actionExit")
self.actionExit.setText("Exit")
self.actionExit.setMenuText("E&xit")
self.actionExit.setAccel(Qt.CTRL+Qt.Key_Q)
if isQtopia:
self.menubar = QPEMenuBar(self,"menubar")
else:
self.menubar = QMenuBar(self,"menubar")
self.clockMenu = QPopupMenu(self)
self.actionAbout.addTo(self.clockMenu)
self.clockMenu.insertSeparator()
self.actionExit.addTo(self.clockMenu)
self.menubar.insertItem("&Clock", self.clockMenu, 0)
self.connect(self.actionAbout, SIGNAL("activated()"),
self.showAboutBox)
self.connect(self.actionExit, SIGNAL("activated()"),
self.close)

def showAboutBox(self):
QMessageBox.about(self, "About",
"

Digital Clock

" +
"PyQt demo for Qtopia")
[/sourcecode]

Обратите внимание, что мы создаем главное меню как QMenuBar или QPEMenuBar в зависимости от флага isQtopia.

Затем измените конструктор DigitalClock — уберите оттуда вызов showCaption.

Наконец, внесите изменения в главную программу:

[sourcecode language='python']
a = QPEApplication(sys.argv)
clock = MainWindow()
clock.resize(170,80)
a.setMainWidget(clock)
clock.show()
a.exec_loop()
[/sourcecode]

Вот, как теперь это выглядит:

Диалоговые окна — кнопки Ok и Cancel

В диалоговых окнах Кутопии нет необходимости вручную создавать кнопки "Ok" и "Cancel" — каждый диалог уже имеет их в заголовке, а также откликается на нажатие соответствующих кнопок.

Я пользуюсь примерно следующим кодом, помещающим кнопки в диалог только в случае необходимости (опять-таки, основываясь на значении флага isQtopia):

[sourcecode language='python']
if not utils.isQtopia:
layout10 = QHBoxLayout(None,0,6,"layout10")
self.btnOk = QPushButton(self,"btnOk")
self.btnOk.setText("O&K")
layout10.addWidget(self.btnOk)
self.btnCancel = QPushButton(self,"btnCancel")
self.btnCancel.setText("&Cancel")
layout10.addWidget(self.btnCancel)
MainDialogLayout.addLayout(layout10)
self.btnOk.setDefault(True)
self.connect(self.btnOk,SIGNAL("clicked()"),self.accept)
self.connect(self.btnCancel,SIGNAL("clicked()"),self.reject)
[/sourcecode]

Этот код выполнятся только когда программа запущена не на Заурусе (точнее не под Кутопией): создаются две кнопки, связываются с соответствующими слотами диалога и пакуются в QHBoxLayout.

Этот код я вставляю в конец конструктора диалога, когда все другие виджеты уже определены и размещены в окне. Таким образом, кнопки "OK" и "Cancel" всегда будут выводиться в самом низу формы, одна возле другой.

Совместимость версий Qt

В настоящий момент на Заурусе используется Qt версии 2.3.2, в то время как в большинстве других ОС уже давно используется Qt версии не ниже 3. Это необходимо учитывать при написании программ. Дело в том, что в версиях до третьей отсутствуют многие классы и методы. Тут можно, опять-таки, в зависимости от того, где выполняется программа, либо использовать имеющиеся классы, либо заменять их собственными реализациями.

Использование Qt Designer'а и утилиты pyuic

Из-за разницы в версиях иногда бывает вручную доводить код, созданный при помощи Qt Designer'а и pyuic. Иногда бывает достаточно выкинуть пару вызовов несущественных методов, либо заменить их на код, работающий в данной версии.

Ссылки

Jonathan Gardner's PyQt Tutorial по-русски: http://pyqt.wikispaces.com/PyQtTutorial
Qt: http://www.trolltech.com/products/qt/index.html
Qtopia: http://www.qtopia.net/modules/developers/
Все о Питоне (а также дистрибутивы для всех платформ) можно найти на главном сайте Питона http://www.python.org

Библиотека разных алгоритмов: классических, оригинальных, красивых, любопытных

dmych — Fri, 09 May 2008 17:52:31 +0000

Источники:

[Knuth] :: Дональд Кнут Искусство программирования

[Wirth] :: Никлаус Вирт Алгоритмы и структуры данных

[Bentley] :: Джон Бентли Жемчужины программирования

ПОИСК

Здесь собраны алгоритмы поиска в массивах.

Линейный поиск

[Wirth, 1.12.1]

    a: ARRAY[0..N-1] OF item;
    i:=0; WHILE (i<N)&(a[i]#x) DO i:=i+1 END

Линейный поиск с барьером

[Wirth, 1.12.1]

    a: ARRAY[0..N] OF item;
    a[N]:=x; i:=0; WHILE a[i]#x DO i:=i+1 END

Бинарный поиск

[Wirth, 1.12.2]

    a: ARRAY[0..N] OF item

Условие: массив упорядочен:

    A k : 1 <= k < N : a[k-1] <= a[k]

Вариант 1

    L:=0; R:=N-1; found:=FALSE;
    WHILE (L<=R) & ~found DO
      m:=AnyValueBetween(L,R);
      IF a[m]=x THEN found:=TRUE
      ELSIF a[m]<x THEN L:=m+1
      ELSE R:=m-1
      END
    END

Вариант 2

    L:=0; R:=N;
    WHILE L<R DO
      m:=(L+R) DIV 2;
      IF a[m]<x THEN L:=m+1 ELSE R:=m END
    END

(R < N)&(a[R]=x) фиксирует совпадение

Вариант 3

Псевдокод:

[Bentley L.4.3]

    l = 0; u = n - 1
    loop
        { t mustbe(l, u) }
        if l > u
            p = -1; break
        m = (l + u) / 2
        case
            x[m] < t: l = m + 1
            x[m] == t: p = m; break
            x[m] > t: u = m - 1

Программа на C:

[Bentley L.5.1]

    typedef int DataType;
    int n;
    DataType x[MAXN];

    int binarysearch(DataType t)
        /* возвращает любое вхождение t в отсортированный
           массив x[0..n-1] либо -1 в случае отсутствия
           вхождений */
    {
        int l, u, m;
        l = 0;
        u = n - 1;
        while (l <= u)
        {
            m = (l + u) / 2;
            if (x[m] < t)
                l = m + 1;
            else if (x[m] == t)
                return m;
            else /* x[m] > t */
                u = m - 1;
        }
        return -1;
    }

Поиск строк

[Wirth, 1.12.3]

    String = ARRAY[0..M-1] OF CHAR  (* ASCIIZ-строка *)

Отношение порядка для строк:

(x=y) = (A j: 0 <= j < M : x[j] =y[j] )

(x < y) = $ i: 0 <= i < N :
    ((A j: 0 <= j < i : x[j] =y[j] )&(x[i] < y[i] ))

Сравнение строк

    i:=0;
    WHILE (x[i]=y[i])&(x[i])#0C) DO i:=i+1 END

Поиск строки методом деления пополам

    T: ARRAY[0..N-1] OF String;
    x: String;

    L:=0; R:=N;
    WHILE L<R DO
      m:=(L+R) DIV 2; i:=0;
      WHILE (T[m,i]=x[i])&(x[i]#0C) DO i:=i+1 END;
      IF T[m,i]<x[i] THEN L:=L+1 ELSE R:=m END
    END
    IF R<N THEN
      i:=0;
      WHILE (T[R,i]=x[i])&(x[i]#0C) DO i:=i+1 END
    END

(R < N)&(T[R,i]=x[i]) фиксирует совпадение

Прямой поиск строки

[Wirth, 1.12.4]

Пусть задан массив s из N элементов и массив p из M элементов, причем 0 < M <= N. Описаны они так:

    s: ARRAY[0..N-1] OF item;
    p: ARRAY[0..M-1] OF item;

Поиск обнаруживает первое вхождение p в s.

    i:=1;
    REPEAT i:=i+1; j:=0;
      WHILE (j<M)&(s[i+j]=p[j]) DO j:=j+1 END
    UNTIL (j=M)OR(i=N-M)
    (* j=M - found; i=N-M - not found *)

Хеширование

[Bentley, 15.1]

    typedef struct node *nodeptr;
    typedef struct node {
        char *word;
        int count;
        nodeptr next;
    } node;

    #define NHASH 29989
    #define MULT 31
    nodeptr bin[NHASH]; /* хеш-таблица */

    /* хеш-функция */
    unsigned int hash(char *p)
    {
        unsigned int h = 0;
        for ( : *p; p++)
            h = MULT * h + *p;
        return h % NHASH;
    }

СОРТИРОВКА

СОРТИРОВКА МАССИВОВ

Сортируем массивы "на месте":

     TYPE index = INTEGER;
     VAR a: ARRAY[1..n] OF item;

StraightInsertion - Сортировка прямым включением

[Wirth, 2.1]

    PROCEDURE StraightInsertion;
      VAR i, j: index; x: item;
    BEGIN
      FOR i:=2 TO n DO
        x:=a[i]; a[0]:=x; j:=i;
        WHILE x<a[j-1] DO a[j]:=a[j-1]; j:=j-1 END;
        a[j]:=x
      END
    END StraightInsertion;

BinaryInsertion - Сортировка методом деления пополам

[Wirth, 2.2]

    PROCEDURE BinaryInsertion;
      VAR i, j, m, L, R: index; x: item;
    BEGIN
      FOR i:=2 TO n DO
        x:=a[i]; L:=1; R:=i;
        WHILE L<R DO
          m:=(L+R) DIV 2;
          IF a[m]<=x THEN L:=m+1 ELSE R:=m END
        END;
        FOR j:=i TO R+1 BY -1 DO a[j]:=a[j-1] END;
        a[R]:=x
      END
    END BinaryInsertion;

StraightSelection - Сортировка методом прямого выбора

[Wirth, 2.3]

    PROCEDURE StraightSelection;
      VAR i, j, k: index; x: item;
    BEGIN
      FOR i:=1 TO n-1 DO
        k:=i; x:=a[i];
        FOR j:=i+1 TO n DO
          IF a[j]<x THEN k:=j; x:=a[k] END
        END;
        a[k]:=a[i]; a[i]:=x
      END
    END StraightSelection;

BubbleSort - Пузырьковая сортировка

[Wirth, 2.4]

    PROCEDURE BubbleSort;
      VAR i, j: index; x: item;
    BEGIN
      FOR i:=2 TO n DO
        FOR j:=n TO i BY -1 DO
          IF a[i-1]>a[j] THEN
            x:=a[j-1]; a[j-1]:=a[j]; a[j]:=x
          END
        END
      END
    END BubbleSort;

ShakerSort - Шейкерная сортировка

[Wirth, 2.5]

    PROCEDURE ShakerSort;
      VAR j, k, L, R: index; x: item;
    BEGIN
      L:=2; R:=n; k:=n;
      REPEAT
        FOR j:=R TO L BY -1 DO
          IF a[j-1]>a[j] THEN
            x:=a[j-1]; a[j-1]:=a[j]; a[j]:=x; k:=j;
          END
        END;
        L:=L+1;
        FOR j:=L TO R BY +1 DO
          IF a[j-1]>a[j] THEN
            x:=a[j-1]; a[j-1]:=a[j]; a[j]:=x; k:=j;
          END
        END
        R:=k-1
      UNTIL L>R;
    END ShakerSort;

ShellSort - Сортировка Шелла

[Wirth, 2.6]

    PROCEDURE ShellSort;
      CONST t=4;	(* расстояние *)
      VAR i, j, k, s: index;
          x: item;
          m: 1..t;
          h: ARRAY[1..t] OF INTEGER;
    BEGIN
      h[1]:=9; h[2]:=5; h[3]:=3; h[4]:=1;
      FOR m:=1 TO t DO
        k:=h[m]; s:=-k;  (* место барьера *)
        FOR i:=k+1 TO n DO
          x:=a[i]; j:=i-k;
          IF s=0 THEN s:=-k END;
          s:=s+1; a[s]:=x;
          WHILE x<a[j] DO a[j+k]:=a[j]; j:=j-k END;
          a[j+k]:=x
        END
      END
    END ShellSort;

HeapSort - Сортировка с помощью дерева

[Wirth, 2.8]
(См. также Кучи)

    PROCEDURE HeapSort;
      VAR L,R: index; x: item;

      PROCEDURE sift(L, R: index);
        VAR i, j: index; x: item;
      BEGIN
        i:=L; j:=2*L; x:=a[L];
        IF (j<R)&(a[j]<a[j+1] THEN j:=j+1 END;
        WHILE (j<=R)&(x<a[j]) DO
          a[i]:=a[j]; i:=j; j:=2*j;
          IF (j<R)&(a[j]<a[j+1]) THEN j:=j+1 END
        END
      END sift;

    BEGIN
      L:=(n DIV 2)+1; R:=n;
      WHILE L>1 DO L:=L-1; sift(L,R) END;
      WHILE R>1 DO
        x:=a[1]; a[1]:=a[R]; a[R]:=x;
        R:=R-1;
        sift(L,R);
      END
    END HeapSort;

QuickSort - Быстрая сортировка Хоара

[Wirth, 2.10]

    PROCEDURE QuickSort;

      PROCEDURE sort(L, R: index);
        VAR i, j: index; w, x: item;
      BEGIN
        i:=L; j:=R;
        x:=a[(L+R) DIV 2];
        REPEAT
          WHILE a[i]<x DO i:=i+1 END;
          WHILE x<a[j] DO j:=j-1 END;
          IF i<=j THEN
            w:=a[i]; a[i]:=a[j]; a[j]:=w;
            i:=i+1; j:=j-1
          END
        UNTIL i>j;
        IF L<j THEN sort(L,j) END;
        IF i<R THEN sort(i,R) END;
      END sort;

    BEGIN sort(1,n);
    END QuickSort;

[Bentley 11.2-3]

Набросок

    void qsort(l, u)
        if l >= u
            /* не более одного элемента - ничего не делаем */
            return
        /* цель: разбить массив относительно какого-либо
        элемента, который оказывается на правильном месте */
        qsort(l, p-1)
        qsort(p+1, u)

Версия 1

    void qsort(l, u)
        if (l >= u)
            return
        m = 1
        for i = [l+1, u]
            /* инвариант: x[l+1..m] < x[l] &&
             * x[m+1..i-1] >= x[l] */
            if (x[i] < x[l])
                swap(++m, i)
        swap(l, m)
        /* x[l..m-1] < x[m] <= x[m+1, u] */
        qsort(l, m-1)
        qsort(m+1, u)

Версия 3

    void qsort(l, u)
        if l >= u
            return
        t = x[l]; i = l; j = u+1
        loop
            do i++ while i <= u && x[i] < t
            do j-- while x[j] > t
            if i > j
                break
            swap(i, j)
        swap(l, j)
        qsort(l, j-1)
        qsort(j+1, u)

ДИНАМИЧЕСКИЕ СТРУКТУРЫ ДАННЫХ

Основные операциии с линейными списками

[Wirth, гл. 4.3]

Представление списка

    TYPE Ptr = POINTER TO Node;
    TYPE Node = RECORD
                  key: INTEGER;
                  next: Ptr;
                  data: ...;
                END;
    VAR p, q: Ptr;

Включение нового элемента в начало списка

    Allocate(q,SIZE(Node)); q^.next:=p; p:=q;

Формирование списка из n элементов

    p:=NIL;  (* в начале список пуст *)
    WHILE n>0 DO
      Allocate(q,SIZE(Node)); q^.next:=p; p:=q;
      q^.key:=n; n:=n-1
    END;

Включение элемента в список после элемента, на который указывает p

    q^.next:=p^.next; p^.next:=q;

Проход по списку

Проход по списку с выполнением над каждым его элементом
операции P(x)

    WHILE p#NIL DO
      P(p^);
      p:=p^.next;
    END;

Поиск элемента в списке

    WHILE (p#NIL)&(p^.key#x) DO
      p:=p^.next;
    END

Последовательное распределение

[Knuth, 2.2.2]

Наиболее простой и естественный способ хранения линейного списка в памяти компьютера заключается в расположении элементов в последовательных ячейках, при котором один узел списка следует сразу же за другим. Тогда

LOC(X[j+1])=LOC(X[j])+c,

где c - размер одного узла.

LOC(X[j])=L[0] +cj,

где L[0] - константа, которая называется базовым адресом (base address), т. е. является адресом некоего узла X[0]. стр. 286

КУЧИ

[Bentley 14]

Куча представляет собой структуру данных, используемую для представления множеств элементов.

                            12
                        ___/  \___
                       /          \
                      /            \
                    20              15
                   /  \            /  \
                  /    \          /    \
                29      23      17      22
                /\      /\      /
               /  \    /  \    /
              35  40  26  51  19

Это двоичное дерево является кучей благодаря двум свойствам.

Первое свойство мы назовем "порядком": значение любого узла не превышает значения любого из его дочерних узлов. Отсюда следует, что наименьший элемент набора находится на вершине дерева. Однако о соотношении левого и правого дочерних узлов ничего не говорится.

Второе свойство кучи называется "формой". Идея формы лучше всего передается следующим рисунком:

Другими словами, двоичное дерево, обладающее свойством "формы", заканчивается не более чем на двух уровнях (то есть заключительные узлы расположены не более чем на двух уровнях), причем находящиеся на нижнем уровне узлы сгруппированы слева. В дереве не должно быть незанятых узлов. Если в нем содержится n узлов, ни один из них не может отстоять более чем на log2(n).

Представление кучи в виде массива

                            x[1]
                       /           \
                x[2]                   x[3]
              /      \               /     \
          x[4]         x[5]       x[6]      x[7]
         /  \         /  \       /
      x[8]  x[9]  x[10]  x[11]  x[12]

Обратите внимание, что для представления куч массивы нумеруются с единицы. Типичные функции для такого дерева определяются следующим образом:

    root = 1
    value(i) = x[i]
    leftchild(i) = 2*i
    rightchild(i) = 2*i + 1
    parent(i) = i/2
    null(i) = (i < 1) or (i > n)

Неявное дерево из n элементов обязательно будет обладать свойством формы: отсутствие элементов в нем просто не предусмотрено.

Вышеприведенная куча из 12 элементов может быть представлена в виде следующего массива:

          | 12 20 15 29 23 17 22 35 40 26 51 19 |
           -------------------------------------
           1                                  12

Второе свойство: массив x[1..n] обладает свойством кучи, если

                A: 2<=i<=n: x[i/2] <= x[i]

Добавление нового элемента

Добавление произвольного элемента в поле x[n] при условии, что x[1..n-1] является кучей, не обязательно даст кучу. Восстановление свойства кучи обеспечивается функцией siftup. Имя функции описывает стратегию, лежащую в ее основе: новый элемент просеивается и всплывает вверх до полагающегося ему места, обмениваясь позициями с вышестоящими элементами:

    void siftup(n)
            /* предусловие: n > 0 && heap(1, n-1)
             * постусловие: heap(1, n) */
        loop
            /* инвариант: heap(1, n) за исключением, быть
             * может, элемента i и его родителя */
            if i == 1
                break
            p = i/2
            if x[p] <= x[i]
                break
            swap(p, i)
            i = p

Если x[1..n] — куча, а мы присваиваем элементу x¹ новое значение, то в любом случае остается верным утверждение heap(2, n). Функция siftdown предназначена для расширения этого утверждения до heap(1, n). Это осуществляется путем просеивания элемента x¹ вниз по массиву, до тех пор, пока у него не закончатся дочерние элементы или пока элемент не окажется не превышающим значени всех его дочерних элементов.

    void siftdown(n)
            /* предусловие: heap(2, n) && n >= 0
             * постусловие: heap(1, n) */
        i = 1
        loop
            /* инвариант: heap(1, n) верно, за
             * исключением, быть может, i и его дочерних
             * элементов (0, 1 или 2) */
            c = 2*i
            if c > n
                break
            /* c - левый дочерний эл-т i */
            if c+1 <= n
                /* c+1 - правый дочерний эл-т i */
                if x[c+1] < x[c]
                    c++
            /* c - наименьший из дочерних эл-тов */
            if x[i] <= x[c]
                break
            swap(c, i)
            i = c

Сортировка с помощью кучи (heapsort)

[Bentley 14.4]
(См. также HeapSort - Сортировка с помощью дерева)

    for i = [2, n]
        siftup(i)
    for (i=n; i >= 2; i--)
        swap(1, i)
        siftdown(i-1)

ПЕРЕСТАНОВКИ

Перемножение перестановок, представленных в виде циклов

[Knuth, 1.3.3]

Произведение перестановок можно выполнять непосредственно с помощью циклической записи. Например, вычислив произведение перестановок

(a c f g)(b c d)(a e d)(d a d e)(b g f a e),

находим (двигаясь слева направо), что «a переходит в c, c переходит в d, d переходит в a, a переходит в d и d остается без изменений». Таким образом, конечным результатом является то, что a переходит в d, и мы запишем «(a d)» в качестве частичного ответа. Теперь выясним, что происходит с d: «d переходит в b, которое затем переходит в g»; следовательно, имеем частичный результат «(a d g)». Рассмотрев, что происходит с g, находим, что «g переходит в a, затем в e, в f и в a»; таким образом, первый цикл замыкается: «(a d g)». Теперь выберем новый элемент, который еще не встречался, напимер, c. Находим, что c переходит в e... Окончательным ответом будет «(a d g)(c e b)».

Алгоритм A

[Knuth 1.3.3 A]

Этот алгоритм берет произведение циклов вида

(a c f g)(b c d)(a e d)(d a d e)(b g f a e)

и вычисляет получающуюся в результате перестановку в виде произведения непересекающихся циклов. Для простоты здесь не приводится описание процедуры удаления единичных циклов; это было бы лишь незначительным обобщением алгоритма. По мере выполнения алгоритма последовательно «помечаем» элементы исходной формулы, т.е. те символы, которые уже «обработаны».

[Первый проход] Отметить все левые скобки и заменить все правые скобки помеченной копией входного символа, который следует за соответствующей левой скобкой.
[Раскрытие скобок] Выполнив поиск слева направо, найти первый непомеченный элемент входной формулы. (Если все элементы помечены, то работа алгоритма заканчивается.) Установить START равным этому элементу; вывести левую скобку; вывести элемент и пометить его.
[Установка CURRENT] Установить CURRENT равным следующему элементу формулы.
[Просмотр формулы] Продвигаться вправо, пока не будет либо достигнут конец формулы, либо найден элемент, равный CURRENT; в последнем случае пометить его и вернуться к шагу 3.
[CURRENT = START?] Если CURRENT <> START, вывести CURRENT и вернуться к шагу 4, снова начав с левого края формулы (продолжая тем самым вывод искомого цикла).
[Закрытие] (Полный искомый цикл выведен.) Вывести правую скобку и вернуться к шагу 2.

Алгоритм B

[Knuth 1.3.3 B]

Этот алгоритм дает, в сущности, тот же результат, что и алгоритм A. Предположим, что переставляемыми элементами являются x¹ , x² , ..., x[n] . Будем использовать вспомогательную таблицу T¹, T², ..., T[n]; по окончании работы алгоритма x[i] переходит в x[j] в перестановке тогда и только тогда, когда T[i] = j.

[Инициализация] Присвоить T[k] <- k, где 1 <= k <= n. Подготовиться также к просмотру справа налево.
[Следующий элемент] Рассмотреть следующий элемент ввода (справа налево). Если ввод исчерпан, то работа алгоритма заканчивается. Если рассматривается элемент <<)>>, то присвоить Z <- 0 и повторить шаг 2; если это элемент <<(>>, то перейти к шагу 4. В противном случае рассматривается элемент x[i] для некоторого i; тогда перейти к шагу 3.
[Замена T[i]] Выполнить взаимный обмен Z<->T[i]. Если в результате получится T[i] = 0, то присвоить j <- i. Вернуться к шагу 2.
[Замена T[j]] Присвоить T[j] <- Z. (Здесь j - это строка, определяющая элемент <<)>>, т.е. правую скобку, которая соответствует только что просмотренной левой скобке.) Вернуться к шагу 2.

Обратная перестановка на месте

Алгоритм I

[Knuth 1.3.3 I]

Заменить X¹X²... X[n], которая является перестановкой чисел {1,2,... n}. Этот алгоритм был предложен Бин-Чао Хуан (Bing-Chao Huang).

[Инициализация] Присвоить m <- n, j <- -1.
[Следующий элемент] Присвоить i <- X[m]. Если i < 0, перейти к шагу 5 (этот элемент уже был обработан).
[Обратить один элемент] (В этот момент j < 0 и i=X[m]. Если m не является наибольшим элементом своего цикла, то первоначальная перестановка давала X[-j]=m.) Присвоить X[m] <- j, j <- -m, m <- i, i <- X[m].
[Конец цикла?] Если i > 0, перейти к шагу 3 (этот цикл не закончен); иначе - присвоить i <- j. (В последнем случае первоначальная перестановка давала X[-j]=m, где m - наибольший элемент в цикле.)
[Сохранить окончательное значение] Присвоить X[m] <- -i. (Первоначально X[-i] было равно m.)
[Цикл по m] Уменьшить m на 1. Если m > 0, перейти к шагу 2; в противном случае работа алгоритма заканчивается.

Алгоритм J

[Knuth 1.3.3 J]

Следующий остроумный алгоритм был предложен Дж. Бутройдом (J. Boothroyd). Этот алгоритм дает такой же результат, как и алгоритм I, но на основании другого метода.

[Сделать все величины отрицательными] Присвоить X[k] <- -X[k] для 1 <= k <= n. Присвоить также m <- n.
[Инициализация j] Присвоить j <- m.
[Нахождение отрицательного элемента] Присвоить i <- X[j]. Если i > 0, присвоить j <- i и повторить этот шаг.
[Обращение] Присвоить X[j] <- X[-i], X[-i] <- m.
[Цикл по m] Уменьшить m на 1; если m > 0, вернуться к шагу 2. В противном случае работа алгоритма заканчивается.

РАЗНОЕ

Ввод/вывод чисел (без знака)

[Wirth, 1.11.3]

    x: WORD;
    i: CARDINAL;
    ch: CHAR;
    d: ARRAY[0..N] OF WORD;

    (* ввод и преобразование *)
    x:=0; Read(ch);
    WHILE ("0"<=ch)&(ch<="9") DO
      x:=10*x+(ORD(ch)-ORD("0"));
      Read(ch)
    END;

    (* преобразование и вывод *)
    i:=0;
    REPEAT d[i]:=x MOD 10; x:=x DIV 10; i:=i+1;
    UNTIL x=0;
    REPEAT i:=i-1; Write(CHR(d[i]+ORD("0")))
    UNTIL i=0;

Простейший кольцевой буфер

[Wirth, 1.11.2]

для использования одной программой

    MODULE Buffer;
    EXPORT deposit, fetch;
    CONST N=1024; (* размер *)
    VAR n, in, out: CARDINAL;
        buf: ARRAY[0..N-1] OF WORD;

    PROCEDURE deposit(x: WORD);
    BEGIN
      IF n=N THEN HALT END;
      n:=n+1; buf[in]:=x; in:=(in+1) MOD N
    END deposit;

    PROCEDURE fetch(VAR x: WORD);
    BEGIN
      IF n=0 THEN HALT END;
      n:=n-1; x:=buf[out]; out:=(out+1) MOD N
    END fetch;

    BEGIN n:=0; in:=0; out:=0
    END Buffer.

Алгоритм Евклида

[Knuth, 1.1 E]

Даны два целых положительных числа m и n. Требуется найти их наибольший общий делитель.

[Нахождение остатка] Разделим m на n, и пусть остаток от деления будет равен r (где 0 <= r < n).
[Сравнение с нулем] Если r=0, то выполнение алгоритма прекращается; n - искомое значение.
[Замещение] Присвоить m <- n, n <- r и вернуться к шагу 1.

Обобщенный алгоритм Евклида

[Knuth, 1.2.1 E]

Даны два целых положительных числа m и n. Требуется найти их наибольший общий делитель (gcd - greatest common divisor) d и два целых числа a и b, таких, что am+bn=d.

[Инициализация] Присвоить a' <- b <- 1, a <- b' <- c <- m, d <- n.
[Деление] Пусть q и r - это частное и остаток от деления c на d соответственно. (Тогда c=qd+r, где 0 <= r < d.)
[Остаток - нуль?] Если r=0, то выполнение алгоритма прекращается; в этом случае имеем am+bn=d, как и требовалось.
[Повторение цикла] Присвоить c <- d, d <- r, t <- a', a' <- a, a <- t-qa, t <- b',b' <- b, b <- t-qb и вернуться к шагу 2.

Циклический сдвиг массива

[Bentley 2.3]

Циклический сдвиг массива x из n элементов влево на i позиций за время, пропорциональное n, причем доступно лишь несколько десятков байт оперативной памяти.

Циклический сдвиг массива x сводится фактически к замене ab на ba, где a — первые i элементов, а b — оставшиеся элементы.

Итак, нужно преобразовать массив ab в ba. Предположим, что у нас есть функция reverse, переставляющая элементы некоторой части массива в противоположном порядке. В исходном состоянии массив имеет вид ab. Вызвав эту функцию для первой части, получим a'b. Затем вызовем ее для второй части: получим a'b'. Затем вызовем функцию для всего массива, что даст (a'b')', а это в точности соответствует ba. Посмотрим, как будет такая функция действовать на массив abcdefgh, который нужно сдвинуть влево на три элемента:

    reverse(0, i-1)	/* cbadefgh */
    reverse(i, n-1)	/* cbahgfed */
    reverse(0, n-1)	/* defghabc */

Дуг Макилрой (Doug McIlroy) предложил наглядную иллюстрацию циклического сдвига массива из десяти элементов вверх на пять позиций; начальное положение: обе руки ладонями к себе, левая над правой.

    --== 1     |  --=== 5   |  --=== 5   |    6 ==--
      ==== 2   |    ==== 4  |    ==== 4  |  7 ====
      ===== 3  X    ===== 3 |    ===== 3 | 8 =====
      ==== 4   |    ==== 2  |    ==== 2  |  9 ====
    --=== 5    |  --== 1    |  --== 1    |  10 ===--
               |            |            X
       6 ==--  |    6 ==--  |  10 ===--  | --== 1
     7 ====    |  7 ====    |  9 ====    |   ==== 2
    8 =====    | 8 =====    X 8 =====    |   ===== 3
     9 ====    |  9 ====    |  7 ====    |   ==== 4
     10 ===--  |  10 ===--  |    6 ==--  | --=== 5
               |            |            |
           повернуть    повернуть     повернуть
          левую руку   правую руку  обе (как целое)

Поиск максимальной подпоследовательности

[Bentley 8.1]

На входе имеется массив x из n вещественных чисел, на выходе должна быть получена максимальная сумма любой непрерывной последовательности элементов массива.

Вариант 1

Перебор всех пар целых i и j, где 0<=i<=j<n; для каждой пары чисел вычисляется сумма x[i..j], после чего проверяется, преверяется, превосходит ли она предыдущее найденное максимальное значение.

    maxsofar = 0
    for i = [0, n)
        for j = [i, n)
            sum = 0
            for k = [i, j]
                sum += x[k]
            /* sum - сумма элементов x[i..j] */
            maxsofar = max(mazsofar, sum)

Вариант 2a

Данный алгоритм позволяет быстро вычислить сумму благодаря тому, что сумма x[i..j] легко получается из предыдущей: x[i..j-1].

    maxsofar = 0
    for i = [0, n)
        sum = 0
        for j = [i, n)
            sum += x[j]
            /* sum - сумма x[i..j] */
            maxsofar = max(maxsofar, sum)

Вариант 2b

Алгоритм вычисляет сумму во внутреннем цикле, обращаясь к структуре данных, которая строится отдельно, до начала первого цикла. Создается массив cumarr, i-й элемент которого содержит кумулятивную сумму значений x[0..i], поэтому сумму x[i..j] можно получить как разность cumarr[j] - cumarr[i-1].

    cumarr[-1] = 0
    for i = [0, n)
        cumarr[i] = cumarr[i-1] + x[i]
    maxsofar = 0
    for i = [0, n)
        for j = [i, n)
            sum = cumarr[j] - cumarr[i-1]
            /* sum - сумма x[i..j] */
            maxsofar = max(maxsofar, sum)

Вариант 3 "Разделяй и властвуй"

Алгоритм основан на правиле:

Если нужно решить задачу размера n, следует рекурсивно решить две подзадачи размера приблизительно n/2, а затем оббъединить их решения в одно целое.

    float maxsum3(l, u)
        if (l > u)    /* пустой массив */
            return 0
        if (l == u)   /* один элемент */
            return max(0, x[l])
        m = (1 + u) / 2
        /* m: поиск макс. посл. слева от границы */
        lmax = sum = 0
        for (i = m; i >= l; i--)
            sum += x[i]
            lmax = max(lmax, sum)
        /* m: поиск макс. посл. справа от границы */
        rmax = sum = 0
        for i = (m, u]
            sum += x[i]
            rmax = max(rmax, sum)
        return max(lmax+rmax, maxsum3(l, m), maxsum3(m+1, u))

Алгоритм запускается вызовом

answer = maxsum3(0, n-1)

Вариант 4 Сканирующий алгоритм

    maxsofar = 0
    maxendinghere = 0
    for i = [0, n)
        /* инвариант: значения maxendinghere и maxsofar
           точны для x[0..i-1] */
        maxendinghere = max(maxendinghere + x[i], 0)
        maxsofar = max(maxsofar, maxendinghere)

Функция comlen - вычисление длины общей части двух строк

[Bentley 15.2]

    int comlen(char *p, char *q)
        i = 0
        while *p && (*p++ == *q++)
            i++
        return i

Установка, проверка и сброс отдельных битов

[Bentley p.239]

    #define BITSPERWORD 32
    #define SHIFT 5
    #define MASK 0x1F
    #define N 10000000
    int a[1+N/BITSPERWORD];

    void set(int i) { a[i>>SHIFT] |= (1<<(i & MASK)); }
    void clr(int i) { a[i>>SHIFT] &= ~(1<<(i & MASK)); }
    int test(int i) { return a[i>>SHIFT] & (1<<(i & MASK)); }

Ұялы телефон & Wordpress – тегі блогым

huanysh — Sun, 04 May 2008 13:25:11 +0000

Ұялы телефоныңыз егер интернетке қосыған болса, сіз оз блогыңызды жаңартуыңызға болады. Бірақ ұялы телефон қазақ тілін қолдамайды, сурет қоса алмайсыз, телефоннан ұзын жазба жазу уақыт алады тек қысқа жазбалар ыңғайлы. (смс жазған секілді боласыз)

Бірінші ұялы телефоныңыздың интернет браузерінен http://m.wordpress.com мекен-жайын теріңіз.

Екінші сізден Wordpress – тегі блогыңыздағы қолданушы аты мен кілт сөзін сұрайды.

Үшінші сізге блогыңыздың санақ (Stat) көрсеткіш орта ашылады.

Төртінші Post (Жазба) бөліміне өтіп жазбаңызды жазуға мүмкіндік аласыз.

Сонда Жазба атауын (Title) енгізіңіз, келесі жазба Мәтінін (Content) жазыңыз, келесі әрекет жазбаға байланысты Ілмектерді (Tags) енгізіңіз. Жазбаны жазып бітсеңіз Жариялау (Publish) батырмасын басып көріңіз.

Енді блогыңызды ашып қарап көрсеңіз болады.

Знову на зв'язку

grandse — Sat, 03 May 2008 22:03:03 +0000

Як можна побачити, блог зовсім трошки змінився. Всюди, де це необхідно, повний варіант замітки на першій сторінці було замінено на короткий, що спрощує перегляд, прискорює завантаження та відображення сторінки.

Окрім цього дякі замітки були доволі серйозно допрацьовані, особливо в плані виправлень помилок в тексті, деякого редагування з метою більш простого сприйняття інформації.

А сьогодні-завтра вже на сторінках з'являться вже нові свіжі думки.

Google Reader қолданушысына көмек.

huanysh — Thu, 01 May 2008 23:36:46 +0000

Навигация
j/k:	келесі немесе алдыңғы жазба
пробел.	келесі жазба немесе бет
<Shift> + пробел:	предыдущая запись или страница
n/p:	элементтерді төмен немесе жоғары сканділеу
<Shift> + n/p:	келесі немесе алдыңғы жазылым
<Shift> + x:	папканы жаю
<Shift> + o:	жазылым немесе папка ашу

Жазбалармен әрекет
s:	жазбаны таңбалау
<Shift> + s:	жазбаны жалпыға қосу
v:	түпнұсқасын көру
t:	ілмекті жазбаға беру
m:	жазбаны оқылған немесе оқылмаған ретінде белгілеу
o/енгізу:	жазбаны бүктеу немесе жаю
<Shift> + a:	балығын оқылған есебінде белгілеу
e:	жазбаны е-почта арқылы жібер

Өту
g, кейін h:	басты бетке өту
g, кейін a:	барлық жазбаларға өту
g, кейін s:	таңдалған жазбаларға өту
g, кейін <Shift> + s:	жалпы жазбаларға өту
g, кейін u:	жазылымдар таңдау бетін ашу
g, кейін t:	ілмектер таңдау бетіне өту
g, кейін <Shift> + t:	санақ бетіне өту
g, кейін d:	қарау бетіне өту

Қосымша
r:	жаңарту
u:	түгел экрандық режимге көшу
1:	бүктелген түріне асуысу
2:	тізімдер түріне ауысу
/:	курсор іздеу алаңына апару
a:	жазылым қосу

Блог « WordPress.com Tag Feed

Маленький юбілей

4-hour workweek Тимоти Ферриса

Переезд

С нови дрехи на ново място

Как меня находят

Wordpress.com 1-сағат демалды

Қазақ тілінде сөйлейміз!!!

Emacs Muse - WYWIWYM для статей WP

Опубликована еще пара статей про Питон на Заурусе

Программирование на Питоне под Qtopia

Введение

Почему Питон?

Требования

Hello, Zaurus

Просто Qt

Hello, Qt!

Особенности запуска из консоли

Qtpe — делаем приложение в стиле Qtopia

Hello, Zaurus!

Запускаем везде!

Hello, Zaurus!

Цифровые часы

Делаем ярлык на рабочем столе

Главное меню

Digital Clock

Диалоговые окна — кнопки Ok и Cancel

Совместимость версий Qt

Использование Qt Designer'а и утилиты pyuic

Ссылки

Библиотека разных алгоритмов: классических, оригинальных, красивых, любопытных

Содержание

ПОИСК

Линейный поиск

Линейный поиск с барьером

Бинарный поиск

Поиск строк

Сравнение строк

Поиск строки методом деления пополам

Прямой поиск строки

Хеширование

СОРТИРОВКА

СОРТИРОВКА МАССИВОВ

StraightInsertion - Сортировка прямым включением

BinaryInsertion - Сортировка методом деления пополам

StraightSelection - Сортировка методом прямого выбора

BubbleSort - Пузырьковая сортировка

ShakerSort - Шейкерная сортировка

ShellSort - Сортировка Шелла

HeapSort - Сортировка с помощью дерева

QuickSort - Быстрая сортировка Хоара

Рекомендации по выбору алгоритмов сортировки

ДИНАМИЧЕСКИЕ СТРУКТУРЫ ДАННЫХ

Основные операциии с линейными списками

Последовательное распределение

КУЧИ

Представление кучи в виде массива

Добавление нового элемента

Сортировка с помощью кучи (heapsort)

ПЕРЕСТАНОВКИ

Перемножение перестановок, представленных в виде циклов

Алгоритм A

Алгоритм B

Обратная перестановка на месте

Алгоритм I

Алгоритм J

РАЗНОЕ

Ввод/вывод чисел (без знака)

Простейший кольцевой буфер

Алгоритм Евклида

Обобщенный алгоритм Евклида

Циклический сдвиг массива

Поиск максимальной подпоследовательности

Функция comlen - вычисление длины общей части двух строк

Установка, проверка и сброс отдельных битов

Ұялы телефон & Wordpress – тегі блогым

Знову на зв'язку

Google Reader қолданушысына көмек.