Программирование 9 класс 2017-2018 учебный год

Дополнительные материалы и ссылки

Урок 24 05.05.2018

Тема урока: Блочные операции с файлами

1. Программа 1 читает двоичный файл (исполняемый файл программы) блоками по 1024 байт и выводит прочитанные байты и, символы, ASCII-коды которых соответствуют этим байтам, на экран

│║ buf:Array[1..1024] of byte; ‑

│║ f:file; ▒

│║ i,n:integer; ▒

│║ j:longint; ▒

│║ fn:string; ▒

│║begin ▒

│║ Readln(fn); ▒

│║ Assign(f,fn); ▒

│║ Reset(f,1); ▒

│║ j:=0; ▒

│║ Repeat ▒

│║ BlockRead(f,buf,SizeOf(buf),n); ▒

│║ for i:=1 to 1024 do ▒

│║ begin ▒

│║ Writeln(j,' ',buf[i],' ',chr(buf[i])); ▒

│║ j:=j+1; ▒

│║ end; ▒

│║ until eof(f); ▒

│║end. ■

│║

└╚══*═══ 23:56 ■▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒┘

Рисунок 1 Основная часть исходного текста программы 1

58319 36 $

58320 36 $

58321 76 L

58322 79 O

58323 78 N

58324 71 G

58325 87 W

58326 79 O

58327 82 R

58328 68 D

58329 0

58330 70 F

58331 80 P

58332 73 I

58333 78 N

58334 84 T

58335 82 R

58336 69 E

58337 83 S

58338 95 _

58339 73 I

58340 78 N

58341 84 T

58342 70 F

58343 73 I

58344 78 N

58345 68 D

58346 82 R

58347 69 E

58348 83 S

58349 79 O

58350 85 U

58351 82 R

58352 67 C

58353 69 E

58354 69 E

58355 88 X

58356 36 $

58357 76 L

58358 79 O

58359 78 N

58360 71 G

58361 87 W

58362 79 O

58363 82 R

58364 68 D

58365 36 $

58366 80 P

58367 67 C

Рисунок 2 Результат работы программы 1 – последние байты.

1. Программа 2, читает двоичный файл (исполняемый файл программы) блоками по 1024 байт, ищет заданную последовательность байтов и только эти байты выводит и символы, ASCII-коды которых соответствуют этим байтам и смещения этих байтов от начала читаемого файла на экран

File Edit Search Run Compile Debug Tools Options Window Help

┌──────────────────────────────── 18042801.pas ──────────────────────────1─────┐

│╔═[■]═══════════════════════════ 18050501.pas ══════════════════════════2═[]═╗

│║(s); ‑

│║Length(s); ▒

│║(f,fn); ▒

│║f,1); ▒

│║ ▒

│║ ▒

│║ BlockRead(f,buf,SizeOf(buf),n); ▒

│║ for i:=1 to n-lens+1 do ▒

│║ begin ▒

│║ find:=true; ▒

│║ for k:=1 to lens do ▒

│║ find:=find and (buf[i+k-1]=ord(s[k])); ▒

│║ if find then ▒

│║ for k:=1 to lens do ▒

│║ Writeln(j+k-1,' ',buf[i+k-1],' ',chr(buf[i+k-1])); ▒

│║ j:=j+1; ▒

│║ end; ▒

│║eof(f); ▒

│║ ■

│║

└╚══════ 26:91 ▒▒▒▒▒■▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒┘

F1 Help F2 Save F3 Open Alt+F9 Compile F9 Make Alt+F10 Local menu

Рисунок 3 Исходный текст программы 2 (фрагмент)

■ Free Pascal IDE Version 1.0.12 [2011/04/23]

■ Compiler Version 2.4.4

■ GDB Version GDB 7.2

■ Using configuration files from: F:\Program Files\FreePascal\bin\i386-win32\

Running "f:\projects\1436\2017-2018\Программирование9\ПРограммы\18050501.exe "

18042801.exe

started

27593 115 s

27594 116 t

27595 97 a

27596 114 r

27597 116 t

27598 101 e

27599 100 d

2. Программа 3, читает двоичный файл (исполняемый файл программы) блоками по 1024 байт и записывает прочитанное в другой файл такими же блоками, т. е. копирует файл.

Использует подпрограммы: BlockRead и BlockWrite.

Рисунок 4 Результат работы программы 2

File Edit Search Run Compile Debug Tools Options Window Help

╔═[■]════════════════════════════ 18050502.pas ══════════════════════════1═[↕]═╗

║program p18050502; ▲

║var ▓

║ buf:Array[1..1024] of byte; ▓

║ fr,fw:file; ▓

║ nr,nw:integer; ▓

║ frn,fwn:string; ▓

║begin ▓

║ Readln(frn); ▓

║ Read(fwn); ▓

║ Assign(fr,frn); ▓

║ Reset(fr,1); ▓

║ Assign(fw,fwn); ▓

║ Rewrite(fw,1); ▓

║ Repeat ▓

║ BlockRead(fr,buf,SizeOf(buf),nr); ▓

║ BlockWrite(fw,buf,nr,nw); ▓

║ until eof(fr); ▓

║end. ▓

║ ▓

║ ▓

║ ▼

╚══════ 17:21 ◄■▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒►┘

F1 Help F2 Save F3 Open Alt+F9 Compile F9 Make Alt+F10 Local menu

Рисунок 5 Исходный текст программы 3

Задачи :

1. Чтение файла, блочное . С клавиатуры вводят имя двоичного файла при необходимости с указанием пути. Написать программу, которая читает этот файл и выводит на экран каждый байт этого файла с указанием смещения от начала файла и символа, ASCII-код которого равен этому байту,

2. Поиск байтов в двоичном файле. С клавиатуры вводят имя двоичного файла при необходимости с указанием пути и строка байтов. Написать программу, которая читает этот файл поблочно и выводит его байты, следующие по порядку, совпадающему с введенной последовательностью. Для каждого байта должно быть указано его смещение, значение и символ, ASCII-код которого совпадает с байтом.

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

3. Чтение ,байтов файла, блочное . С клавиатуры вводят имя двоичного файла при необходимости с указанием пути, а также – начальное смещение и количество байтов. Написать программу, которая читает этот файл и выводит на экран каждый байт этого файла с указанием смещения от начала файла и символа, ASCII-код которого равен этому байту, Байты должны быть выведены, начиная с указанного смещения и в указанном количестве.

Указание: для проверки используйте результаты работы программы

4. Копирование файлов . Написать программу, которая копирует один двоичный файл в другой с использованием операций блочного чтения и записи. Имена файлов вводят с клавиатуры.

Указание: для проверки скопируцте ранее написанную вспомогательнцю программу и запустите ее копию.

Домашнее задание

1. Поиск байтов в двоичном коде, универсальный.. Программа 2 классной работы будет работать не корректно, если искомая строка будет начинатьсч в конце одного блока и продолжаться с начала следующего блока. Исправить программу так, чтобы она корректно работала и в этом случае.

2. Творческая.

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

Литература:

Информатика. Задачник-практикум в 2-х томах. Т. 1 Под ред. И.Г. Семакина, Е.К. Хеннера, изд. 4, М., Бином. Лаборатория знаний, 2012.

Скачать URL: https://drive.google.com/file/d/0B6696ckkWj_zZDB2Yk4xMk1iR28/view

Задачи для допуска к зачету

Из книги, указанной в разделе «Литература» стр. 223-229, 235

Общее задание: Написать программу для вычисления указанных выражений. Все необходимые величины вводят с клавиатуры в алфавитном порядке. В случае невозможности вычислить формулу программа должна вывести соответствующее сообщение.

Кто
Аброськина	18 стр.235
Деревяга	20 стр. 236
Евсиков	21 стр. 236
Калинин	22 стр. 236
Мишустин	24 – стр. 236
Самохвалов	25 – стр. 236
Ушаков	26 – стр. 236
Шаповалов	27 – стр. 236

Допуск 21.04.2018

Аброськина 0 Нет программы

Мишустин 0 Нет программы

Самохвалов 0 Нет программы