Приоритет выполнения логических операций в Pascal.

Логические операции применяются при написании многих программ в Pascal. Все операции имеют определенный приоритет выполнения : Первой выполняется операция NOT. Второй выполняется операция AND. Последними выполняются операции OR и XOR (Они имеют ...

Функции Sqr, Abs, Sqrt, Sin, Cos, Arctan, Ln, Exp, Pi в Pascal.

Мы уже знаем, какие существуют функции для целых переменных. Это – нахождение модуля числа (Функция Abc), а также возведение числа в квадрат (Функция Sqr). В этом уроке мы рассмотрим функции, применяемые к дробным числам. Это функции Sqr - квадрат ...

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

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

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

Структурное программирование

Самое главное в программировании - это научиться писать четкие, логические и структурированные программы.

• Используйте осмысленные имена для переменных, процедур и функций.

• Используйте отступы ...

Примеры использования различных операторов цикла.

Примеры использования различных операторов цикла.

Процедура Read может считывать информацию в переменные 4-х типов: строкового, символьного, целочисленного, вещественного. В прошлом уроке мы считывали информацию из файла в переменную строкового типа (String). В этом уроке разберем аналогичную ситуацию с символьным типом (Char).

В случае символьных переменных считывание происходит по одному символу. Например, если в файле записано слово «Pascal», то в переменную типа Char будет записан первый символ «P». Процедура Write в этом случае выведет на экран только одну букву «P». Например, изменим наш текстовый файл text.txt, записав в него слова «Turbo Pascal» и «Programmirovanie».

schitihvanie informacii iz fayjla v peremennihe simvoljnogo tipa

Считывание информации из текстового файла в символьную переменную.



Program file2;
Uses crt;
var fl:text;
str:char;
i:integer;
begin
clrscr;
assign (fl, 'programs\text.txt');
reset (fl);
read (fl,str);
write (str);
close(fl);
readln
end.




В строке №4 мы объявляем символьную переменную для считывания в нее информации из файла. Так как переменная символьного типа может хранить лишь один символ, то результатом программы будет выведенная на экран буква «T».

schitihvanie informacii iz fayjla v peremennihe simvoljnogo tipa.

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



Program file2_3;
Uses crt;
var fl:text;
str:char;
i:integer;
begin
clrscr;
assign (fl, 'programs\text.txt');
reset (fl);
while not Eof(fl) do
begin
read (fl,str);
write (str);
end;
close(fl);
readln
end.




В строке №10 записываем цикл. Функция Eof означает конец файла (End of file). В скобках после слова Eof указывается название файловой переменной, которая связана с файлом. Таким образом, строка №10 означает: пока не будет конец файла «fl», должны выполняться действия, после слова «do». После слова «do» расположены 2 оператора, которые должны быть выполнены в цикле.

Строка №12. Первый оператор считывает поочередно символы из файла в переменную «str».

Строка №13. Второй оператор выводит эти символы на экран.
Благодаря циклу, все символы из файла будут прочитаны и выведены на экран.

schitihvanie informacii iz fayjla v peremennihe simvoljnogo tipa..

schitihvanie informacii iz fayjla v peremennihe simvoljnogo tipa...


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

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

Следующая статья : Файлы в Паскаль (часть 3).


Комментарии  

 
+1 # Олег 07.02.2013 17:38
Простите, а зачем в 5-ой строке переменная i????
Ответить
 
 
0 # Серик 22.06.2014 18:58
И я о том же)
Ответить
 
 
0 # III 23.06.2014 06:49
Она не используется, ее можно не писать
Ответить
 
 
+1 # Лександр 19.05.2013 08:05
Полезная статья, доступное обьяснение :-)
Ответить
 
 
0 # Светлана 11.03.2017 08:40
Спасибо большое за ваши труды! :-) :-) :-)
Ответить
 
 
0 # Виктория 19.03.2017 15:59
Простите, не могли бы Вы подсказать как осуществить запись данный из файла в массив записей?
Ответить
 

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

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

   ГлавнаяПаскальФайлы в ПаскальСчитывание информации из файла в переменную символьного типа.