министерство образования и науки Российской Федерации
Старооскольский технологический институт им. А.А. УГАРОВА
(филиал) федерального государственного автономного образовательного учреждения
высшего профессионального образования
«Национальный исследовательский технологический университет «МИСиС»
ОСКОЛЬСКИЙ ПОЛИТЕХНИЧЕСКИЙ КОЛЛЕДЖ
Коренькова Татьяна Николаевна
Основы алгоритмизации и программирования
Часть 2
Методические указания
ДЛЯ СПЕЦИАЛЬНОСТИ
230401 – Информационные системы
Старый Оскол
2013
РАССМОТРЕНЫ П(Ц)К 230103, 230401
«___»___________________2012 г. Протокол №_____________ Председатель: Т. Н. Коренькова _______________________________ |
Методические указания составлены в соответствии с рабочей программой по дисциплине «Основы алгоритмизации и программирования» специальности 230401
Зав. отделения _______Л.А. Гладких |
Составители: Е.Н. Запасник - преподаватель спец. дисциплин
ОПК
Т. Н. Коренькова– преподаватель спец. дисциплин
ОПК
Рецензенты:Волокитина Ю.А. - преподаватель дисциплин специальности
230103
Жеребцова О.П. – зам. директора по УР ГОУ СПО СИТ
Содержание
Практическое занятие №18
Работа с файлом последовательного доступа. 4
Практическое занятие №19
Работа с файлом произвольного доступа. 4
Практическое занятие №20
Использование стандартных процедур и функций для работы с файлами. 7
Практическое занятие №21
Программирование модуля. 11
Практическое занятие №22
Создание библиотеки подпрограмм. 16
Практическое занятие №23.
Использование библиотеки подпрограмм. 16
Практическое занятие №24.
Изучение интегрированной среды разработчика. 19
Практическое занятие №25
Создание простого проекта. 26
Практическое занятие №26
Объявление класса, создание экземпляров класса. 32
Практическое занятие №27
Создание наследованного класса. 39
Практическое занятие №28
Перегрузка методов. 45
Практическое занятие №29
Создание проекта с использованием кнопочных компонентов. 52
Практическое занятие №30
Создание проекта с использованием компонентов для работы с текстом. 60
Практическое занятие №31
Создание проекта с использованием компонентов ввода
и отображения чисел, дат и времени. 63
Практическое занятие №32
Создание проекта с использованием компонентов
стандартных диалогов и системы меню. 68
Практическое занятие №33
Разработка оконного приложения. 69
Практическое занятие №34
Разработка оконного приложения с несколькими формами. 71
Практическое занятие №35
Разработка многооконного приложения. 74
Сообщения и коды ошибок. 77
Литература. 90
Практическое занятие №18-19 Работа с файлом последовательного доступа. Работа с файлом произвольного доступа.
Цель работы: научиться решать задачи и использовать процедуры и функции обработки файлов
Теоретическая часть
Файл – форма хранения информации вне среды.
Файл удобен:
- данные из файла можно использовать в нескольких программах;
- файл сохраняется после окончания работы программы;
- данные часто не убираются в ОЗУ (игры);
- с файлами можно выполнять множество полезных манипуляций.
Типы файлов:
Последовательные – чтение/запись от начала к концу.
Файлы прямого доступа – доступ к записи по адресу.
Индексированные файлы – доступ к записи по адресу и по ключу.
Порядок работы с файлами.
Объявить файл (varf: fileof тип или varf: text для текстового файла).
Связать файловую переменную с конкретным файлом на устройстве.
Открыть файловую переменную для записи или чтения.
Закрыть файловую переменную для записи или чтения.
По организации работы с данными различают три вида файлов: типизированные, текстовые и нетипизированные.
Основные процедуры и функции обработки файлов (общие).
Assign(f,name); - связь файловой переменной f с внешним файлом.
Reset(f); - открыть существующий файл для чтения.
Rewrite(f); - открыть файл для записи (если существует – стирается!).
Close(f); - закрыть файл для чтения/записи.
Eof(f) - функция «конец файла» (true, если из файла всё считано).
Для типизированных файлов:
Read(f,a); - чтение информации из файла в переменную а.
Write(f,a); - запись информации (значения переменной a) в файл.
Seek(f,num); - пропуск заданного количества записей в файле.
Truncate(f); - удаление части файла с текущего компонента до конца.
FilePos(f) - функция номера текущей записи в файле.
FileSize(f) - функция - количество записей в файле (размер файла).
Для текстовых файлов:
Readln(f,a); - чтение строки из файла.
Writeln(f,a); - запись строки в файл.
Append(f); - открыть файл для добавления в конец файла.
Eoln(f) - функция конец строки файла.
SeekEoln(f) - функция конец строки файла(не замечает пробелов в конце).
SeekEof(f) - функция конец файла(не замечает пробелов в конце файла).
Задача 1. Присвоить переменным числовые значения и сохранить их в файле. Прочитать файл, передав числовые значения другим переменным.
Задача 2. Создать текстовый файл данных из нескольких строк. Прочитать файл.
Прочитать числовое значение из текстового файла в числовую переменную и изменить полученное значение.
Program fil; Uses crt;
var f: file of integer;
b,c,d,x,y,z,i:integer;
t:text; a:string;
Begin
clrscr; b:=3; c:=4; d:=5;
writeln('b=',b,' c=',c,' d=',d);
assign(f,'c:r.dat');
rewrite(f);
write(f,b,c,d);
close(f);
reset(f);
read(f,x,y,z);
write('x=',x,' y=',y,' z=',z);
close(f);
readkey; clrscr; assign(t,'c:\pascal\turbo7\work\prob.dat');
reset(t);
for i:=1 to 4 do
begin
readln(t,a);
writeln(a);
end;
readln(t,x); x:=x*2; writeln('x=',x);
close(t);
readkey;
End.