[ «ИНФОРМАТИКА БАЗОВЫЙ КУРС 2-е издание Рекомендовано Министерством образования Российской Федерации в качестве учебного пособия для студентов высших технических учебных заведений 300.piter.com Издательская программа 300 ...»
и запрограммировать функцию Years%(), которая в качестве аргумента получает количество особей и возвращает число лет, требуемое для их разведения.
Типы данных в Бейсике В конце названия функции Years% указан символ %. Таким образом в Бейсике описывается тип возвращаемого функцией значения. Допустимые символы приведены в таблице.
Тип переменной Символ в конце имени переменной Добавление новой функции В QBasic имеется удобная возможность добавить в программу новую функцию, избежав при этом дополнительного ручного кодирования. Это делает команда Edit • New Function (Правка • Создать функцию). В появившемся диалоговом окне надо ввести название функции Years% и нажать клавишу ENTER. Основной текст программы временно пропадет, и появится автоматически сгенерированное описание новой функции:
, FUNCTION Years%
END FUNCTION
Для того чтобы вернуться обратно к главному тексту, а из него — к любой введенной подпрограмме, необходимо использовать клавишу F2. При ее нажатии на экран выводится список всех созданных подпрограмм, а в первой строке — имя главного модуля.Функции Years% надо указать список аргументов. В данном случае он будет состоять из одного параметра:
FUNCTION Years% (X AS INTEGER) Расчет популяции Так как для определения нового члена последовательности Фибоначчи требуется знать значения двух предыдущих членов, прежде всего надо описать три локальные переменные F1, F2 и F3, хранящие три очередных значения последовательности.
Исходно первые три значения 1,1 и 2 запишутся в переменные F1, F2 и F3 явно, а в дальнейшем новые значения будут вычисляться программно.
Сам расчет представляет собой условный цикл, который выполняется до тех пор, пока очередное значение не превысит заданное количество особей. Число таких циклов — число лет — будет подсчитываться в локальной переменной-счетчике YearsNum, первоначально имеющей значение 3.
FUNCTION Years%(X AS INTEGER) ' описание переменных
DIM Fl AS INTEGER, F2 AS INTEGER, F3 AS INTEGER
DIM YearsNum AS INTEGER задание начальных значений цикл, пока число кроликов меньше заданного определяем новый член последовательности ' увеличиваем число лет на 1:' повторяем цикл ' в качестве возвращаемого значения ' используется значение переменной YearsNum Years%.= YearsNum
END FUNCTION
Сохранение текста программы е файле После того как текст программы набран, его желательно сохранить в файле, чтобы потом снова обращаться к нему, улучшать, изменять или просто повторно запускать готовую программу.Сохранение текста программы в файле осуществляется командой File > Save (Файл • Сохранить), в результате чего на экране показывается диалоговое окно выбора каталога и имени файла. В качестве такого имени можно указать kroliki, выбрать нужный каталог и нажать клавишу ENTER. По умолчанию к названию kroliki припишется расширение.BAS. В дальнейшем эту программу можно снова загрузить в QBasic командой File • Open (Файл • Открыть).
Запуск программы Для запуска программы надо перейти к ее главной части (с помощью клавиши F2) — при этом в самом ее начале автоматически добавится строка с объявлением только что определенной функции:
DECLARE FUNCTION Years% (X AS INTEGER) Теперь надо нажать клавишу F5 (Запуск). Программа начинает работать.
Возможный вариант диалога:
Введите количество особей: Требуемое число лет: Введите количество особей: Введите количество особей: Первую сотню кроликов надо разводить довольно долго, зато потом их приплод будет увеличиваться стремительными темпами.
20.8. Пример на Паскале. Раскрашивание круга Постановка задачи В рабочем окне программы должны находиться: изображение круга, поле ввода с подписью, кнопки Закрасить и Закрыть. В поле ввода шестью символами (шестнадцатеричными цифрами от 0 до F) задается новый цвет круга. Первые два символа определяют интенсивность синего цвета, третий и четвертый — интенсивность зеленого, пятый и шестой — интенсивность красного. Чистый синий опишется строкой ffOOOO, чистый зеленый — строкой OOffOO, чистый красный — строкой OOOOff, черный — строкой 000000, белый — строкой ffffff и т. д.
В самой программе надо дополнительно проверить, правильно ли введена эта строка. При нажатии на кнопку Закрасить цвет круга должен измениться.
Знакомство с Delphi Для работы со средой Delphi необходимо, чтобы она была предварительно установлена на компьютере.
После ее запуска (например, Пуск • Программы • Borland Delphi 7 • Delphi 7) на экране появятся следующие окна (рис. 20.2).
Главное окно Delphi 7. Здесь расположено основное меню, командные кнопки, а в правой части— палитра компонентов. Она состоит из набора панелей, на которых компоненты сгруппированы по решаемым задачам: панель Standard (Стандартная) — стандартные элементы управления, панель Win32 — элементы управления для версии Windows 9х, панель Internet (Интернет) — компоненты для организации работы в Интернете и т. д.
Визуальный проектировщик. С его помощью проектируется будущее окно программы. Оно представлено в виде формы, у которой можно менять свойства и размеры. На ней будут располагаться нужные элементы управления.
Редактор исходных тестов. Предназначен для набора и редактирования текстов программы. Ключевые слова и различные идентификаторы выделяются в этом редакторе особыми цветами и разным шрифтом. Принцип его работы аналогичен принципам работы большинства редакторов Windows.
Инспектор объектов. Используется для визуальной (без программирования) настройки свойств различных объектов на этапе проектирования.
Заголовок окна Понять, как работает Инспектор объектов, лучше всего на примере. Пока что автоматически создана только одна пустая форма (называющаяся Formi), но она обладает множеством различных свойств. Заголовок формы (будущего окна программы) задается в свойстве Caption (Заголовок). Чтобы его изменить, надо в Инспекторе объектов найти строку, в левой части которой написано Caption, и в правой части этой строки, небольшом поле ввода, указать новое название, например Раскрашивание. Тут же изменится и заголовок формы в визуальном проектировщике.
Аналогично меняются и любые другие свойства. Сначала в выпадающем списке в верхней части Инспектора выбирается нужный объект (или он выделяется на форме щелчком мыши), затем находится название свойства и в правой части его значение меняется на новое. Изменение может происходить как путем простого ввода нового значения с клавиатуры, так и выбором одного из предопределенных значеПример на Паскале. Раскрашивание круга ний из списка. В некоторых случаях для редактирования свойства вызывается специальный редактор.
Свойства могут быть многосоставными, например, свойство Font (Шрифт) — слева от названия такого свойства ставится символ «±». Двойным щелчком мыши на его названии оно раскрывается и показывает все свои вложенные подсвойства.
Размещение компонентов на форме Прежде всего разместим на форме поле ввода. Для этого на палитре компонентов с помощью закладки выбирается панель Standard (Стандартная) и нажимается кнопка с всплывающей подсказкой Edit (выбран компонент «поле ввода»). Затем надо щелкнуть мышкой на форме, и в месте щелчка появится элемент управления Editi.
Его можно перетаскивать по форме и менять размеры.
В свойстве Text (Содержимое) этого объекта исходно надо задать пустую строку, чтобы при запуске программы в данном поле ничего не показывалось.
Рядом с полем ввода надо разместить свободное поле с комментарием. Для этого на панели компонентов выбирается компонент, называющийся Label (Подпись), и помещается на форме так, как это было сделано с полем ввода. Новый объект автоматически получит название Label 1. Чтобы указать в нем текст «Цвет», его надо ввести в свойство Caption.
Изменить название любого объекта на форме можно, изменив его свойство Name в Инспекторе объектов.
В нижней части формы надо разместить кнопку — компонент Button (Кнопка) на панели Standard (Стандартная). Название этой кнопки (Закрасить) задается в свойстве Caption.
На панели Additional (Дополнительно) имеется компонент Shape (Фигура). Этот компонент помещается в центр формы. Он получит название Shape 1 и исходно примет форму квадрата, закрашенного белым цветом. Чтобы превратить его в круг, надо значение свойства Shape изменить на stCircle.
Теперь осталось только добавить кнопку, закрывающую форму. Это действие стандартное, поэтому в Delphi 7имеется специальный компонент BitBtn (Кнопка с картинкой) на панели Additional (Дополнительно), позволяющий автоматизировать такие действия, не прибегая к программированию.
После размещения такой кнопки на форме (она получит название BitBtn 1) значение ее свойства Kind (Вид выполняемого действия) надо установить в bkClose (Закрыть окно). При этом на кнопке появится изображение стандартной картинки, символизирующей действие закрытия.
В завершение надо изменить заголовок этой кнопки (свойство Caption) с английского слова Close на русское Закрыть, и на этом процесс проектирования приложения можно считать законченным.
Сохранение проекта Перед тем как приступить к программированию, проект надо сохранить. Это действие выполняется командой File • Save All (Файл • Сохранить все), после чего сначаГлава 20. Основы программирования ла выбирается каталог и указывается имя файла, в котором хранится программное описание (на Паскале) структуры и работы спроектированной формы. Имя файла будет иметь расширение.PAS по умолчанию. Далее система Delphi 7 спросит, куда и под каким именем сохранить файл проекта, содержащий всю информацию об используемых формах и модулях (их может быть в одном проекте сколько угодно, но одна форма всегда будет главной) и всевозможные настройки. Название файла проекта не должно совпадать с названием файла с исходным текстом программы.
Обработка нажатия кнопки В создаваемой программе вручную придется запрограммировать фактически только одно событие — нажатие на кнопку Закрасить. Чтобы создать первоначально пустую подпрограмму, вызываемую при нажатии на эту кнопку, надо просто дважды щелкнуть на ней мышкой. При этом система Delphi 7 вызовет редактор, автоматически сгенерирует нужный текст и разместит курсор именно в том месте, где можно начать описание нужного алгоритма.
procedure TForml.ButtonlClick(Sender: TObject);
Обработчик события Нажатие на кнопку Button 1 — это обычная подпрограмма, метод класса TForml (этот класс описывает главную форму Formi). Единственный параметр Sender характеризует источник сообщения о случившемся событии. Его практически всегда можно игнорировать.
Алгоритм работы данного метода будет следующим. Первоначально надо убедиться, что длина введенной в поле Editi строки равна 6 символам и каждый из этих символов — шестнадцатеричная цифра. Если это не так, то выполнение обработчика надо сразу завершить (для этого предназначена стандартная процедура Паскаля Exit, мгновенно завершающая работу текущей подпрограммы).
Если же введенные данные корректны, их надо:, 1. Преобразовать в промежуточную строку в формате $00хххххх, где хххххх — шесть введенных цифр.
2. Эту строку преобразовать в число, которое будет рассматриваться как цвет.
3. Установить новый цвет круга на основании полученного значения.
Содержимое поля ввода Editi хранится в виде строки в его свойстве Text. Доступ к этому свойству осуществляется с помощью конструкции Editi.Text.
Длина строки определяется стандартной функцией lengthQ со строкой в качестве параметра.
Стандартная функция Pos(), получая две строки как аргументы, проверяет, не содержится ли первая строка во второй, и если содержится, то возвращает номер начальной позиции. В противном случае Pos() возвращает ноль. Эта функция потребуется для определения, все ли символы во введенной строке допустимы.
Стандартная функция UpperCaseQ преобразует строку к верхнему регистру. Такое преобразование требуется, чтобы разрешить ввод значений цветов на любых регистрах.
Преобразование строки в число выполняет стандартная функция StrTolntQ.
Объект Shapei имеет свойство Brush (Кисть для фона), которое, в свою очередь, имеет вложенное свойство Color (Цвет заливки). Его и надо в конечном счете изменить.
Как только это произойдет, цвет круга в окне автоматически изменится на новый.
procedure TForml.ButtonlClick(Sender: TObject);
// если длина введенной строки не равна 6, II то закончить работу if length(Editl.Text) 6 then exit;
// в локальную переменную s заносится строка, // содержащая допустимые символы Запуск программыto компиляция.Text [i]F9.(FFOFFF, круга 20.3. Программа Delphi 7987654цвета. Задаваяиразличныеувидеть соответ- 0 строке s работе тическизапустится. 6 нажатиемсимволстроки автома- Рис равным abcdef,ifвыполнится можновнаглядно изво потом проствующиеpos компилирующая система, найден Такстрокеthen exit;
Программа запускается каждыйпеременной s вs)прекратить значит, грамма:=i этонормальноdoсимвол ине требуется в =.
end; им (Uppercase (Editl клавишу )., // он "0123456789ABCDEF"; только введенной закраски for — "$00"+Editl.Text; на цвета числу/преобразованному сначала Shapel недопустим, значение строку заливки переменной в s если очередной — := StrToInt (s).;
20.9. Пример на Си++. Рисование графиков Система Microsoft Visual Studio.NETво многом схожа с рассмотренной средой Delphi, но визуальные возможности построения пользовательского интерфейса реализованы в ней только для Бейсика и С#. Поддержка Си++ в этой системе унаследована от старых версий и не предоставляет разработчику столь удобного проектирования.
Тем не менее мы рассмотрим простой пример ее использования для создания программы, рисующей график функции.
Постановка задачи Некоторая подпрограмма задает зависимость значения функции от аргумента. Надо нарисовать в окне график, показывающий эту зависимость.
Принципы рисования в Visual Studio Перерисовывать экран в Windows приходится по самым разным причинам. Например, окно было закрыто другими приложениями, свернуто или оказалось временно заслоненным своими вспомогательными окнами. При этом перерисовывать приходится или все содержимое, или только часть. Программа, созданная с помощью Visual Studio, сама определяет, что и когда ей надо перерисовать, и все элементы управления тоже это «понимают». Особое требование к организации перерисовки возникает, только когда программист напрямую использует функции рисования.
Все эти функции в таком случае надо размещать в обработчике события On Draw, которое вызывается автоматически.
Технология рисования Система Microsoft Visual Studio.NET не содержит визуальных средств создания программ на Си++, аналогичных возможностям Delphi. Она предлагает дизайнеры форм только для Бейсика и С#. Поэтому мы изучим несложный вариант использования графических примитивов Windows для демонстрации техники рисования графиков в пределах клиентского окна шаблонного приложения. Любое окно Windows характеризуется так называемым контекстом устройства, своеобразным объектом, содержащим различные методы графического вывода в пределах этого окна. Доступ к контексту нужного нам окна будет автоматически предоставлен Microsoft Visual Studio.NET при формировании обработчика OnDraw.
Для создания графика потребуются два метода этого объекта: метод MoveTo(x,y), устанавливающий новое начальное положение — точку (х, у) для следующих операций рисования, и метод LineTo(x,y), проводящий линию из предыдущей точки в новую.
Метод отрисовки Так как система Microsoft Visual Studio.NET не дает возможности работать с формой напрямую, подготовка «пустого» приложения будет немного сложнее, чем в предыдущих примерах. После запуска системы надо дать команду File • New • Project (Файл • Создать • Проект), на панели Project Types (Типы проектов) выбрать раздел 20.9. Пример на Си++. Рисование графиков Visual C++ Projects (Проекты Visual C++), а на панели Templates (Шаблоны) — значок MFC Application (Оконное приложение).
Название проекта (например, Grafiki) и его местонахождение задается в полях Name (Имя) и Location (Расположение). После нажатия на кнопку ОК запускается Мастер настройки вида будущего приложения. Изменять в нем ничего не надо, достаточно нажать кнопку Finish (Готово). Система сгенерирует заготовку пустого, но работоспособного проекта. Посмотреть его структуру можно с помощью средства Просмотра решения (Solution Explorer), вызываемого командой View • Solution Explorer (Вид • Просмотр решения).
В этом множестве автоматически сгенерированных файлов нас интересует файл GrafikiView.cpp, непосредственно ответственный за отображение содержимого клиентских окон на экране. Чтобы открыть его в редакторе, надо дважды щелкнуть мышкой на соответствующей строке.
Алгоритм отображения графика несложен. Он умещается в нескольких операторах.
Координату по оси Y нельзя взять непосредственно из.NET, сформированная переменной у, а надо вычислять по формуле Height-y, по- автоматически тому что в системе Windows считается, что точка с координатами (0,0) расположена в верхнем левом углу окна, а ось Y направлена вниз.
Для удобства восприятия эту ось надо перевернуть.
Необходимо сформировать обработчик события OnDraw. Для этого перейдем в раскрывающийся список в верхнем правом углу окна редактора исходных текстов, и найдем в нем строку OnDraw. После ее выбора в редакторе появится следующий новый текст:
// CGrafikiView drawing void CGrafikiView::OnDraw(CDC* /*pDC*/) CGrafikiDoc* pDoc = GetDocument();
ASSERT_VALID(pDoc);
I/ TODO: add draw code for native data here Параметр pDC — это нужный нам указатель на контекст устройства. Его мы и будем использовать для вывода графиков. Обратите внимание, что по умолчанию он взят в скобки-комментарии и недоступен внутри функции. Поэтому его надо раскомментировать.
void CGrafikiView::OnDraw(CDC* pDC) CGrafikiDoc* pDoc = GetDocument();
ASSERT_VALID(pDoc);
// TODO: add draw code for native data here // начальные координаты // переменная-прямоугольник // определяем размеры клиентского окна // вызовом стандартной функции Windows GetClientRect(Srect);
// фиксируем начальную точку pDC->MoveTo(0,rect.Height());
// цикл, пока каждая координата очередной точки // укладывается в клиентскую область while( х < rect.Width() && у < rect.Height() ) // соответствующее значение по оси Y // в новую точку (х,rect.Height()-у) // рисуется линия pDC->LineTo(x,rect.Height()-у);
Чуть выше метода OnDraw надо определить функцию f(), не привязанную ни к какому классу. В ней происходит вычисление значения анализируемой математической функции по заданному аргументу. Для примера, она может выглядеть так:
Стандартная функция log() вычисляет значение логарифма. Коэффициент 50 нужен, чтобы кривая пропорционально размещалась в окне. Хотя функция 1од() рассчитывает действительное значение, компилятор автоматически настроит программный код так, чтобы оно было преобразовано в целый тип, соответствующий типу переменной у.
Исходно функция log() и ряд других не подключены к текущему проекту. Чтобы они стали доступными, библиотеку, в которой они хранятся, необходимо явно указать компилятору. Делается это с помощью командной строки которую можно поместить в самое начало текущего файла.
Далее проект надо сохранить, выполнить компиляцию и запустить, нажав клавишу F5. В дальнейшем, изменив один оператор присваивания в функции f() и подобрав подходящие коэффициенты, с помощью этой программы можно строить самые разные графики.
Практические задания по программированию Задание Дано натуральное число. Составить программу, которая представляет данное число в виде суммы квадратов натуральных чисел, содержащей минимальное число слагаемых. Например:
12=22+22+ 23=32+32+22+ Задание Дан массив, содержащий iV элементов.
Написать подпрограммы, выполняющие следующие действия:
• перестановку элементов массива в обратном порядке;
• вычисление суммы А[1] + А[2]*А[2] + А[3]*А[3]*А[3]...;
• определение элементов массива, разность модулей которых имеет наибольшее значение;
• определение значения, которое встречается среди элементов массива максимальное число раз, и вычисление количества таких вхождений;
• упорядочение элементов массива по возрастанию.
Задание Дан двумерный массив, содержащий NxN элементов.
Написать подпрограммы, выполняющие следующие действия:
• вычисление среднего арифметического для элементов каждой строки массива;
• замену нулями всех элементов, расположенных на главной диагонали матрицы;
• определение наибольшего элемента и его положения в массиве.
Задание Дана текстовая строка.
Написать подпрограммы, выполняющие следующие действия:
• подсчет количества слов в строке (в качестве границ слов рассматриваются пробелы);
• подсчет количества цифр в строке;
• определение десятичного числа, которому соответствует строка, если она представляет запись этого числа в шестнадцатеричной системе;
• проверку соответствия содержимого строки правилам записи идентификаторов языков программирования.
Рекомендуемая литература 1. Бобровский С. И. Delphi 7. Учебный курс. - СПб.: Питер, 2003,736 с.
2. Бройдо В. Л. Вычислительные системы, сети и телекоммуникации. Учебник для вузов. - СПб.: Питер, 2003,688 с.
3. Бэйн С. Эффективная работа: CorelDraw 11; перев. с англ. — СПб.: Питер, 2003, 4. Говорухин В. Н., Цибулин В. Г. Компьютер в математическом исследовании.
Учебный курс. - СПб.: Питер, 2001,624 с.
5. Гук М. Ю. Аппаратные интерфейсы ПК. Энциклопедия. — СПб.: Питер, 2003, 6. Гук М. Ю. Аппаратные средства IBM PC. Энциклопедия. — СПб.: Питер, 2003, 7. Додж М., Стинсон К. Эффективная работа: Excel 2002; перев. с англ. — СПб.:
Питер, 2002,992 с.
8. Зихерт К., Ботт Э. Эффективная работа: Windows ХР; перев. с англ. — СПб.:
Питер, 2003,1072 с.
9. Комер Д. Принципы функционирования Интернета; перев. с англ. — СПб.:
Питер, 2002,384 с.
10. Крёнке Д. Теория и практика построения баз данных; перев. с англ. — СПб.:
Питер, 2003, 800 с.
11. Маров М. Н. Эффективная работа: 3ds max 5. — СПб.: Питер, 2003,992 с.
12. Миллхоллон М., Мюррей К. Эффективная работа: Word 2002; перев. с англ. — СПб.: Питер, 2003, 944 с.
13. Немнюгин С. A. Turbo-Pascal. Программирование на языке высокого уровня.
Учебник для вузов. — СПб.: Питер, 2003, 544 с.
14. Олифер В. Г., Олифер Н. А. Компьютерные сети. Принципы, технологии, протоколы. Учебник для вузов. — СПб.: Питер, 2003, 864 с.
15. Павловская Т. А. Паскаль. Программирование на языке высокого уровня. Учебник для вузов. — СПб.: Питер, 2003,400 с.
16. Павловская Т. А. C/C++. Программирование на языке высокого уровня. Учебник для вузов. — СПб.: Питер, 2003, 464 с.
17. Пасько В. П. Эффективная работа в Интернете. — СПб.: Питер, 2003, 544 с.
18. Петров М. Н., Молочков В. П. Компьютерная графика: Учебник для вузов. — СПб.: Питер, 2003,736 с.
19. Попов В. Б. Практикум по Интернет-технологиям. Учебный курс — СПб.: Питер, 20. Рейнбоу В. Компьютерная графика. Энциклопедия; перев. с англ. — СПб.: Питер, 21. Тайц А. М., Тайц А. А., Петров М. Н. Эффективная работа: Photoshop 7. — СПб.:
Питер, 2003,768 с.
22. Таненбаум Э. С. Архитектура компьютера; перев. с англ. — СПб.: Питер, 2003, 23. Таненбаум Э. С. Компьютерные сети; перев. с англ. — СПб.: Питер, 2003,992 с.
24. Фаронов В. В. Delphi. Программирование на языке высокого уровня. Учебник для вузов. — СПб.: Питер, 2003, 640 с.
25. Феддема Э. Эффективная работа: Access 2002; перев. с англ. — СПб.: Питер, 26. Хамахер К, Вранешич 3., Заки С. Организация ЭВМ; перев. с англ. — СПб.:
Питер, 2003,848 с.
27. Хелд Г. Технологии передачи данных; перев. с англ. — СПб.: Питер, 2003,720 с.
28. Шалин П. А. Энциклопедия Windows XP. - СПб.: Питер, 2003, 688 с.
Алфавитный указатель Adobe Illustrator Adobe Photoshop CD-ROM Open Type Paint PCMCIA plug-and-play plug-ins PROMT XT RISC-процессор UNICODE Usenet Web-графика Web-документ публикация Web-редактор справочная система 162 программный WordPad Алфавитный указатель гибкий диск графика фрактальная группировка кодирование 20, преобразование сортировка 18, транспортировка двоичный код дефрагментация диска диаграмма редактирование дигитайзер динамический диапазон 17, драйвер производительность изображением-картой 291 настройка 69, ГОСТ-альтернативная комбинирование компилятор компьютерная безопасность 215 выделение линиатура маркер заполнения Алфавитный указатель палитра виртуальная динамическая папка параллельные вычисления параметр фактический Паскаль переменная поисковый указатель 236 растровый автоматический запуск 150 формул запуск по расписанию 153 режим светодиодный Проводник программа проектирование резидентная сервер 18, файловый сервис-провайдер системный календарь 157 форматирование планшетный 88,489 тактовый генератор отправка получение список 27, маркированный 180, нумерованный средства проверки дисков ссылка абсолютная гипертекстовая 210, относительная Алфавитный указатель форматирование 270, 545 симметричное пользовательская 517 настройка 156, цветовая палитра 421 электронная таблица 55, цветовая температура 415 элемент частота регенерации чипсет шаблон 263,277, изменение Информатика. Базовый курс. 2-е издание Литературные редакторы В. Мураховский, И. Симонович Подписано в печать 13.02.04. Формат 70X100/16. Усл. п. л. 51,6.
ООО «Питер Принт». 196105, Санкт-Петербург, ул. Благодатная, д. 67в.
Налоговая льгота — общероссийский классификатор продукции Отпечатано с фотоформ в ФГУП «Печатный двор» им. А. М. Горького Министерства РФ по делам печати, телерадиовещания и средств массовых коммуникаций.
Перевел в электронный вид Волков О.В.
«