Строковые константы в Pascal.

В качестве значения строковой константы может выступать любая последовательность символов. Эта последовательность заключается в апострофы. Строковая константа отличается от символьной константы тем, что здесь в качестве значения константы можно ...

Процедуры Dec и Inc в Pascal.

При работе с целыми числами используются процедуры DEC и INC. Процедура Dec уменьшает число на определенное значение, а процедура Inc увеличивает число на определенное значение.

Операции умножения и сложения в Pascal.

В данном уроке мы рассмотрим операции умножения и сложения в Pascal. Умножение в Pascal обозначается знаком «*», а сложение - знаком «+».

Циклы и массивы

Алфавит языка Паскаль.

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

Итерационные циклы.

Если число повторений заранее не известно и решение о завершении цикла принимается на основе анализа некоторого условия, то такой повторяющийся вычислительный процесс называется итерационным циклом.

...

Из прошых уроков мы научились открывать файл для чтения с помощью процедуры Reset. Однако текстовый файл можно открывать не только для чтения, но и для записи в него информации. Для записи информации в файл используется процедура Rewrite.

 Запись в текстовый файл.




Program file6;
Uses crt;
var fl:text;
str:string;
begin
clrscr;
assign (fl, 'programs\text.txt');
rewrite (fl);
read (str);
write (fl,str);
close(fl);
end.





В строке №8 записываем процедуру Rewrite. Данная процедура открывает файл, указанный в скобках после слова Rewrite, для записи в него информации. В нашем случае в скобках после слова Rewrite стоит переменная «fl», которая связана с текстовым файлом «text.txt» с помощью процедуры Assign (строка №7). Поэтому этот текстовый файл и будет открыт для записи.

Строка №9. Процедура Read обеспечивает ввод строковой информации (после слова Read в круглых скобках стоит строковая переменная str). Благодаря этой процедуре мы сможем вводить с клавиатуры различные слова. Эти слова будут записаны в строковую переменную «str»

Строка №10. Процедура Write обеспечивает запись информации в текстовый файл. Запись в строке №10 означает, что в текстовый файл («fl») будет записана информация из переменной «str» (т.е. та информация, которую мы введем с клавиатуры). 

zapisj v tekstovihyj fayjl

После запуска программы введите какое-нибудь слово (например, «programmirovanie») и нажмите Enter.

zapisj v tekstovihyj fayjl.

Теперь посмотрим наш текстовый файл «text.txt» (C:\FPC\2.2.2\bin\i386-win32\Programs). Если вы помните, то после прошлого урока там были записаны слова «pascal», «admin» и «turbo». Теперь в файле «text.txt» записано слово «programmirovanie»

zapisj v tekstovihyj fayjl..

Это означает, что процедура Rewrite позволяет записывать информация в файл, но при этом удаляет всю старую информацию (Rewrite с англ. «перезаписывать»).


Дополнение к материалу.

Попробуйте удалить файл «text.txt» из директории C:\FPC\2.2.2\bin\i386-win32\Programs. Теперь запустите программу из этого урока. Как видите, программа работает, хотя самого файла не существует. Теперь зайдите в директорию C:\FPC\2.2.2\bin\i386-win32\Programs. Наш файл «text.txt» находится в том месте, откуда мы его удалили. Дело в том, что если файла не существует, то при использовании процедуры Rewrite он будет создан автоматически (имя файла и его расположение указывается в процедуре Assign).


Предыдущая статья : Текстовые файлы в Паскаль.

Оглавление : Уроки Паскаль. Файлы.

Следующая статья : Запись в текстовый файл (продолжение).

Комментарии  

 
-18 # Михаил 10.11.2012 08:13
Так писать нельзя.
Программа не читаема
Ответить
 
 
+10 # Антон 22.03.2013 23:31
Это просто небольшой пример. К тому же все разложено по полочкам
Ответить
 
 
+12 # Георгий 16.12.2012 18:20
Рабочая программа)
Ответить
 
 
-1 # 228мАМКА ТОВЯ 14.02.2017 06:49
:-x :eek: :-? :oops: :sad: :-x
Ответить
 

Добавить комментарий

Защитный код
Обновить

   ГлавнаяПаскальФайлы в Паскаль