Лабораторный практикум по информатике. Практикум по дисциплине Информатика Уфа 2012 3 Лабораторный практикум по дисциплине Информатика Уфимск гос авиац техн унт Сост. В. В. Мартынов, Е. Н. Прошин, Ю. В
 Скачать 8.39 Mb.
|
|
3.2.4. Нетипизированные файлы Нетипизированные файлы очень похожи на типизированные, за исключением того, что при работе с ними можно сразу считать или записать несколько элементов файла. Нетипизированные файлы - это последовательность компонент произвольного типа. Объявление нетипизированного файла: Var F: File; Открытие нетипизированного файла выполняется процедурами ReSet или ReWrite. При этом может указываться дополнительный параметр, который указывает размер одного блока данных в байтах: ReSet(F, 25); или ReWrite(F, SizeOf(Integer)*12); В первом примере открывается файл для чтения/записи с размером блока 25 байт. Во втором случае размер блока указывается через размер типа Integer. Функция SizeOf возвращает кол-во байт, отводимых под указанный тип или переменную. Если размер блока данных опущен, принимается размер по умолчанию, равный 128 байт. Чтение данных выполняется следующей процедурой: BlockRead(F, Biffer, Count); BlockRead(F, Biffer, Count, Result); В примерах из файла F в область памяти, задаваемую переменной Buffer, считывается Count блоков данных. Во втором случае в переменную Result дополнительно заносится число реально считанных блоков данных. Такая ситуация возможна в тех случаях, когда конец файла встречается раньше, чем будет считано заданное число блоков. Если значения Count и Result различаются, это говорит о неполном чтении. Аналогичные правила действуют для записи данных в файл: BlockRead(F, Biffer, Count); BlockRead(F, Biffer, Count, Result); 110 Частичная запись возможна в том случае, если на диске заканчивается свободное место. Для нетипизированных файлов можно использовать процедуры Seek, FIlePos и FileSize, аналогично соответствующим процедурам типизированных файлов. 3.2.5. Сводная таблица процедур и функций для работы с файлами Таблица 1. Сводная таблица процедур и функций, используемых в работе с файлами Проц/функ Типизированный Нетипизированный Текстовый Assign + + + Rewrite + + + Reset + + + Append + Read + + Write + + Readln + Writeln + BlockRead + BlockWrite + Seek + + FilePos + + FileSize + + Flush + Close + + + EOF + + + EOLn + 111 3.2.6. Примеры решения задач с использованием файлов Примеры решения задач с использованием типизированных файлов Задание Создать файл, содержащий 50 случайных целых чисел в диапазоне [10..30], вывести числа на экран в обратном порядке. Программа Program FileTest1; const N=50; var F: file of integer; { объявление файла с целыми числами } i: integer; m: integer; begin Assign(F,'test1.dat'); {связать файловую переменную с файлом} ReWrite(F); { открыть файл для записи } for i:=1 to N do begin m := Random(30-10+1)+10; { получить случайное число } Write(F, m); { записать число в файл } end; Close(F); { закрыть файл } ReSet(F); { открыть тот же файл для чтения } for i:=50 downto 1 do begin Seek(F,i-1); { установить указатель файла } Read(F,m); { считать число из файла } Write(m:4); { вывести число на экран } end; Close(F); { закрыть файл } WriteLn; end. Результат выполнения программы: 112 Примеры решения задач с использованием текстовых файлов Задание В заданном текстовом файле на английском языке подсчитать частоту вхождения каждой буквы. Строчные и прописные буквы не различаются, все остальные символы пропускаются. Программа Program FileTest2; Type { объявление массива для подсчета символов } RateArray = array ['A'..'Z'] of integer; var FT: Text; { объявление файловой переменной текстового типа } ch: char; N,i: integer; s: String; rate: RateArray; begin { начальная инициализация счетчика символов } for ch:='A' to 'Z' do rate[ch] := 0; { операции с файлом } Assign(FT,'test.txt'); {связать файловую переменную с файлом} ReSet(FT); { открыть файл для чтения } while not EOF(FT) do begin { пока не конец файла } ReadLn(FT,s); { считать строку из файла } { (с переходом на новую строку) } N := Length(s); { взять длину строки } for i:=1 to N do begin { цикл по всем символам строки } ch := UpCase(s[i]); {перевести символ в верхний регистр} if ch in ['A'..'Z'] then { если символ–английская буква } rate[ch] := rate[ch]+1;{увеличить счетчик соотв.символа} end; end; Close(FT); { закрыть файл } for ch:='A' to 'Z' do Write(ch,': ',rate[ch]:2,' '); {вывести частоты символов} 113 WriteLn; end. Исходные данные для тестирования программы talk to me softly there's something in your eyes don't hang your head in sorrow and please don't cry i know how you feel inside I've i've been there before somethin's changin' inside you and don't you know Результат выполнения программы Примеры решения задач с использованием нетипизированных файлов Задание Составить программу, которая создает массив целых чисел и записывает его в нетипизированный файл, а также вычисляет среднее арифметическое элементов файла. Программа Program FileText3; Uses Crt; {поключение модуля Crt – работа с текстовой информацией на дисплее} Var f : file; {объявление нетипизированной файловой переменной} i, k, s : integer; Mas : Array [1..10] of byte; {описание массива} Begin ClrScr; {Процедура очистки экрана} Randomize; 114 for i := 1 to 10 do {описание цикла, формирующего массив, состоящий из 10 случайных чисел, и выводящего их на экран} begin Mas[i] := Random(10); write(Mas[i]:3); end; assign(f, 'file.dat'); {связывание файловой переменной с файлом} rewrite(f, 1); {открытие файла для записи} blockwrite(f, Mas, 10); {запись в файл массива чисел} close(f); {закрытие файла} reset(f,1); S:=0; i:=0; while not Eof(f) do {цикл, подсчитывающий сумму чисел} begin blockread(f, k, 1); s:= s+k; Inc(i); end; close(f); writeln; write(s/i:5:2); {вывод на экран среднеарифметического чисел} readln; End. 4. Описание оборудования и используемых программных комплексов При выполнении лабораторной работы необходим специализированный компьютерный класс с минимальными системными требованиями компьютеров: – Процессор – Intel Pentium III; – ОЗУ – 256 Mb; – видеокарта – 32 Mb. Требуемое программное обеспечение: – Операционная система Microsoft Windows; – Borland Pascal 7.0 for DOS /Borland Pascal 7.0 for Windows. 115 5. Краткое руководство по эксплуатации оборудования При использовании оборудования необходимо: – соблюдать общие правила нахождения в учебных лабораториях, работы с компьютером и использования программных средств; – привести в порядок одежду; – осмотреть рабочее место, убрать все мешающие работе предметы; – визуально проверить правильность подключения ПЭВМ к электросети. 6. Задания 1. Организовать простейшую базу данных по студентам группы. Сведения о студенте включают: ФИО, год рождения, пол, средний балл. Обеспечить ввод данных, редактирование, вывод на экран. Информацию хранить в типизированном файле. 2. Дан текстовый файл. Считая, что количество букв в одном слове не превосходит 20, определить, сколько в файле имеется слов, состоящих из одного, двух, трех и т.д. символов. Результат вывести в другой текстовый файл. 3. Дан текстовый файл, который содержит массив целых чисел. Необходимо записать массив чисел из текстового файла в нетипизированный файл, а также вычислить среднее арифметическое элементов файла. 4. Сведения об автомобиле состоят из его марки, номера и фамилии владельца. Создать файл, содержащий сведения о нескольких автомобилях, после чего определить фамилии владельцев и номера автомобилей заданной марки. Марка автомобиля вводится пользователем. 5. Дан текстовый файл, содержащий сведения о студентах группы. Сведения включают ФИО, год рождения, оценки по 4 экзаменам за последний семестр. Сведения об одном студенте находятся в одной строке, отделены друг от друга точкой с запятой. Считать сведения, записать в типизированный файл соответствующего типа, вывести на экран ФИО студента с максимальным средним баллом. 6. Сведения об автомобиле состоят из его марки, номера и фамилии владельца. Создать файл, содержащий сведения о нескольких автомобилях, после чего определить количество автомобилей каждой марки. 116 7. Дан текстовый файл, который содержит массив из 50 чисел. Необходимо записать массив чисел из текстового файла в нетипизированный файл, а также минимальный и максимальный элемент. 8. Дан текстовый файл, содержащий программу на языке Паскаль. Проверить эту программу на соответствие числа открывающих и закрывающих круглых скобок. 9. Дан текстовый файл. Записать все строки файла в новый файл, изменив порядок следования букв в каждой строке на противоположный. 10. Создать файл, содержащий не более 100 случайных целых чисел. Выполнить сортировку чисел по возрастанию. 11. Создать файл, содержащий не более 100 случайных целых чисел. Создать новый файл, разместив все нечетные числа в начале файла, а четные – в конце, при этом порядок следования чисел сохраняется. 12. Дан текстовый файл, содержащий строки произвольной длины. Отформатировать текст и записать его в новый файл так, чтобы все строки имели одинаковую длину, равную длине самой длинной строки. Форматирование выполняется добавлением пробелов между словами. 13. Дан текстовый файл, содержащий сведения о товарах по предприятиям. Сведения включают наименование, стоимость, адрес предприятия, название предприятия и др. Сведения об одном товаре находятся в одной строке, отделены друг от друга точкой с запятой. Считать сведения, записать в типизированный файл соответствующего типа, вывести на экран название товара с максимальной стоимостью. 14. Дан текстовый файл, который содержит массив целых чисел. Необходимо записать массив чисел из текстового файла в нетипизированный файл, а также найти минимальный элемент. 15. Дан текстовый файл, содержащий сведения о товарах по предприятиям. Сведения включают наименование, стоимость, адрес предприятия, название предприятия и др. Сведения об одном товаре находятся в одной строке, отделены друг от друга точкой с запятой. Считать сведения, записать в типизированный файл соответствующего типа, вывести на экран название товара с максимальной стоимостью. 117 16. Дан текстовый файл. Записать все строки файла в новый файл, изменив порядок следования букв в каждой строке на противоположный. Посчитать количество букв в каждой строке и строк. 17. Дан текстовый файл. Записать в новый файл строку с максимальным количеством букв. Вывести эту же строку на экран, изменив порядок следования букв на противоположный. 18. Создать файл, содержащий не более 50 случайных целых чисел. Записать в новый файл и вывести на экран максимальное и минимальное числа. 19. Дан текстовый файл с текстом не менее 15 строк. Записать в новый файл все слова, начинающиеся с определенной буквы. Буква вводится по запросу пользователя. 20. Дан текстовый файл с текстом не менее 20 строк. Записать в новый файл все слова, в которых количество букв не превышает определенного значения. Значение вводится по запросу пользователя. 7. Методика выполнения задания 1. Получить вариант задания у преподавателя. 2. На основе рассмотренных в методическом указании по лабораторной работе примеров решения задач выполнить полученное задание. 3. Программа на языке Turbo Pascal должна содержать операторы ввода и вывода необходимых значений для вычислений, вывод результатов решения задачи с корректными комментариями. 4. Оформить расчеты и выводы в виде файла Word. 5. Сдать отчет преподавателю. Контрольные вопросы 1. Что такое «типизированный файл»? 2. Что такое «нетипизированный файл»? 3. Что такое «текстовый файл»? 4. Что такое «указатель файла»? 5. Как установить указатель файла в требуемую позицию? 6. Для каких типов файлов можно устанавливать позицию указателя файла? 118 7. Какие процедуры предназначены для открытия типизированного файла? 8. Какие процедуры предназначены для открытия текстового файла? 9. Какие процедуры и в какой последовательности надо вызывать для чтения данных из типизированного файла? 10. Как задать размер блока для нетипизированного файла? 11. Какими процедурами выполняется чтение и запись для нетипизированных файлов? 12. Какие функции позволяют узнать текущее положение указателя в файле? 8. Требования к содержанию и оформлению отчета Отчет по лабораторной работе должен содержать: - Название университета, факультета и кафедры; - Название работы; - Сведения о студенте (ФИО, группа, курс) и преподавателе (должность, ФИО); - Цель работы; - Постановку задачи; - Протокол и результаты выполнения работы: экранные копии, программный код. - Выводы по работе. 9. Критерии результативности лабораторного практикума Лабораторная работа считается выполненной, если: - задание к лабораторной работе выполнено в полном объеме; - студент представил программный код и результаты его выполнения; - результаты выполнения программы соответствует поставленным задачам; - при устном ответе на 1-2 контрольных вопроса по указанию преподавателя студент демонстрирует знание основных операторов и определений изученной темы и умение применить их при решении соответствующих задач; - представленный отчет по лабораторной работе соответствует требованиям раздела 7. 119 Лабораторная работа №7 Информационные технологии подготовки документов с помощью Microsoft Office Word 2010 1. Цель работы Изучение основных возможностей создания и форматирования документов средствами текстового процессора MS Word 2010. 2. Задачи работы Получение навыков профессиональной работы с документами, содержащими рисунки, таблицы, элементы деловой графики, формулы. 3. Теоретическая часть 3.1. Назначение и возможности MSWord Word является мощным универсальным средством для управления (создание, редактирование, просмотр и обмен) документами и публикациями различного типа, включая публикации в Интернет. Его возможности (версии Word’95-Word’2003): набор текста различными шрифтами, с возможностью форматирования, выделения отдельных терминов и фраз; составление и использование при форматировании текста шаблонов и стилей; включение в документ рисунков, диаграмм, графиков, таблиц, результатов вычислений и формул, сносок и примечаний; редактирование всего документа, в том числе текста, рисунков, диаграмм, графиков, таблиц, результатов вычислений и формул и т.п.; построение оглавления и алфавитного указателя; получение различного вида списков рисунков, таблиц, графиков; возможность проверки правописания, как на русском языке, так и на иностранных; использование словарей синонимов для расширения терминологической базы публикации; составление и использование тезаурусов; совместное создание документов; подготовки публикации на другом языке; 120 проверочные расчеты в процессе подготовки публикации; обеспечение достаточного уровня безопасности (защита от макросов, паролирование, цифровая подпись); расширение функций Wordпосредством создания макросов и написания программ на WordBasic и многое другое. Новое в версии Word 2010: Создание документов Работа в пользовательском интерфейсе Microsoft Office Fluent, содержащимвсе средства, требуемые для выполнения текущей задачи.Добавление часто используемого содержимого в документы из элементов в коллекции титульных страниц, цитат и колонтитулов, создание собственных стандартных блоков. Создание, импорт и публикация блогов. Создание редактируемых уравнений с использованием готовых. Динамический подсчет слов. Использование типографских возможностей. Функция включает нумерацию и маркировку списков, стили маркированных списков, шрифты. Управление диспетчером и конструктором ссылок. Контекстная проверка правописания. Редактирование и форматирование документов Функция построения графиков и диаграмм включает создание объемных форм, эффектов прозрачности, падающих теней и т.д. Добавление эффектов форматирования непосредственно в текст документа. Word 2010 содержит новые и улучшенные инструменты редактирования изображений. Экспресс-стили. Настройка тем Office. Макеты для организационных диаграмм и диаграмм рисунков в SmartArt. Совместное редактирование документов при помощи службы Windows Live. Доступ к документам через браузер. Интеграция документов в бизнес-процессы Доступ к содержимому документов, обеспечивающий совместимость с широким набором программ и решений. Управление содержимым с помощью специальных элементов. Обзор области сведений о документе. Поддержка форматов Office XML через пользовательские схемы. Привязка данных. 121 Управление документами Поиск по содержимому документа. Восстановление черновых несохраненных версий файлов. Настройка ленты. Управление репозиториями документов. Уменьшение размера файлов и восстановление поврежденных файлов. Возможность создания динамических смарт-документов. Выявление документов с внедренными макросами. 3.2. Общий интерфейс Word В самом простом случае для создания документа в Word необходимо в требуемой папке, например, на рабочем столе в папке Иванов, выбрать из контекстного меню команду Создать Документ Microsoft Word, с клавиатуры ввести название этого документа, например, «Задание к ЛР по MSWord» и открыть документ, дважды щелкнув на созданный файл. На экране откроется следующее (Рис. ). Интерфейс Word состоит из следующего: 1. Рабочее окно, строка заголовка. Кнопки панели быстрого доступа (слева-направо): Системное меню, Сохранить, Отменить, Повторить, Настройка панели быстрого доступа. Кнопки управления окном в правом верхнем углу: Свернуть, Свернуть в окно и Закрыть; 2. Меню команд (Лента), в нем сосредоточены все команды MSWord. Доступно при помощи мыши и клавиатуры (Alt, далее соответствующие подсказкам клавиши); 3. Панели (вкладки) инструментов (на них вынесены наиболее часто употребимые группы команды). Доступны также при помощи мыши и клавиатуры. Активизируются по необходимости в меню команд (Лента). При работе могут дополняться автоматически либо настраиваться пользователем; 4. Линейки горизонтальная и вертикальная (активизируются Вид/Линейка). Доступна только при помощи мыши; 5. Вертикальная полоса прокрутки. Доступна при помощи мыши; 6. Область задач, например, Стили (активизируется Главная/Стили). Доступна при помощи мыши и клавиатуры; 7. Область документа; 8. Контекстное меню (активизируется щелчком правой кнопки мыши для конкретного положения курсора); |