Конспект урока по информатике «Текстовые файлы. Процедуры чтения и записи»

1. Установите   соответствие   между   процедурами   и   выполняемыми   ими   операциями   над файлами: Процедуры 1. Close (<Имя ФП>)  2. Append (<Имя ФП>)   3. ReWrite (<Имя ФП>)  4. Assign (<Имя ФП>, 'Путь и имя файла') 5. ReSet (<Имя ФП>)  6. Read (F, N)  и    ReadLn (F, N)                               7. Write (F, N)  и   WriteLn (F, N)                              Операции над файлами a) Создать или перезаписать b) Считать из файла c) Cохранить и закрыть файл d) Записать в файл e) Создать (открыть) и дописать в конец  файла f) Установить связь между ФП и файлом g) Открыть для чтения Ответ:________________________________________ 2. Дана программа, которая выводит на экран текст, содержащийся в файле dan.txt . Строки кода перепутаны. Восстановите исходный порядок кода. В ответе запишите только номера строк восстановленной программы, например: 4,1,9…  Программа:  1. Begin 2. Close (F);  3. WriteLn (S); 4. Var  F: Text; 5. Begin 6. Assign (F, 'С:\PABCWork\dan.txt'); 7. End;  8. ReadLn (F, S);  9. While not EОF (F) do  10. S: String; 11. Reset (F);  12. End.  Ответ:______________________________________ 1. Установите   соответствие   между   процедурами   и   выполняемыми   ими   операциями   над файлами: Процедуры 1. Close (<Имя ФП>)  2. Append (<Имя ФП>)   3. ReWrite (<Имя ФП>)  4. Assign (<Имя ФП>, 'Путь и имя файла') 5. ReSet (<Имя ФП>)  Операции над файлами h) Создать или перезаписать i) Считать из файла j) Cохранить и закрыть файл k) Записать в файл l) Создать (открыть) и дописать в конец  файла 6. Read (F, N)  и    ReadLn (F, N)                               m) Установить связь между ФП и файлом 7. Write (F, N)  и   WriteLn (F, N)                              n) Открыть для чтения Ответ:________________________________________ 2. Дана программа, которая выводит на экран текст, содержащийся в файле dan.txt . Строки кода перепутаны. Восстановите исходный порядок кода. В ответе запишите только номера строк восстановленной программы, например: 4,1,9…  Программа:  1. Begin 2. Close (F);  3. WriteLn (S); 4. Var  F: Text; 7. End;  8. ReadLn (F, S);  9. While not EОF (F) do  10. S: String; 5. Begin 6. Assign (F, 'С:\PABCWork\dan.txt'); 11. Reset (F);  12. End.  Ответ:______________________________________