Инструменты пользователя

Инструменты сайта


subjects:programming:pascal:file

Различия

Здесь показаны различия между двумя версиями данной страницы.

Ссылка на это сравнение

Предыдущая версия справа и слева Предыдущая версия
Последняя версия Следующая версия справа и слева
subjects:programming:pascal:file [2021/03/29 17:20]
[Работа с файлами]
subjects:programming:pascal:file [2021/04/02 15:29]
[Открытие текстового файла для чтения]
Строка 40: Строка 40:
 <code pascal readtextfile.pas>​ <code pascal readtextfile.pas>​
 Program readtextfile;​ Program readtextfile;​
-Uses crt;+Uses crt;  // Подключаем модуль для clrscr
 var var
   fl:​text; ​ // Для связи программы с текстовым файлом. Файловые переменные,​ предназначенные для работы с текстовыми файлами,​ должны иметь тип данных Text.   fl:​text; ​ // Для связи программы с текстовым файлом. Файловые переменные,​ предназначенные для работы с текстовыми файлами,​ должны иметь тип данных Text.
   str:​string; ​ // Будем использовать для чтения строк из файла.   str:​string; ​ // Будем использовать для чтения строк из файла.
 begin begin
-  clrscr;+  clrscr; ​ // clrscr - очищает экран
   assign (fl, '​programs\text.txt'​); ​ // Теперь посредством файловой переменной «fl» мы можем управлять файлом «text.txt».   assign (fl, '​programs\text.txt'​); ​ // Теперь посредством файловой переменной «fl» мы можем управлять файлом «text.txt».
   reset (fl);  // Инициация файла – это открытие файла для чтения,​ записи либо для чтения и записи одновременно. Процедура Reset говорит нам о том, что файл открывается только для чтения.   reset (fl);  // Инициация файла – это открытие файла для чтения,​ записи либо для чтения и записи одновременно. Процедура Reset говорит нам о том, что файл открывается только для чтения.
subjects/programming/pascal/file.txt · Последние изменения: 2021/04/02 17:20 —

На главную страницу Обучение Wikipedia Тестирование Контакты Нашли ошибку? Справка

Записаться на занятия

Ошибка Записаться на занятия к репетитору

Телефоны:

  • +7 (910) 874 73 73
  • +7 (905) 194 91 19
  • +7 (831) 247 47 55

Skype: eduVdom.com

закрыть[X]
Наши контакты