Оператор выбора Case Of в Pascal.

Помимо условного оператора If в языке программирования Pascal существует оператор выбора Case of. Рассмотрим его применение на примере программы, которая выводит на экран то или иное сообщение, в зависимости от введенного числа.

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

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

Функции Copy, Pos, процедуры Delete, Insert.

Функция Copy позволяет копировать из строки часть символов. Функция имеет 3 параметра. Copy (st, index, count). St-строка из которой копируют, Index-номер символа, с которого начинается копирование, Count-количество символов, которое будет ...

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

Программирование циклов. Оператор безусловного перехода.

Цикл — это последовательность операторов, которая может выполняться более одного раза. В языке Паскаль разработано три механизма для конструирования циклов, использующих операторы FOR, WHILE, REPEAT.

...

Работа со строковыми данными.

Написание большинства программ не обходится без строковых данных. Строковые данные используются при организации диалога для ввода исходных значений переменных, задания условий выполнения ...

Процедура 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
Она не используется, ее можно не писать
Ответить
 
 
0 # Лександр 19.05.2013 08:05
Полезная статья, доступное обьяснение :-)
Ответить
 
 
0 # Светлана 11.03.2017 08:40
Спасибо большое за ваши труды! :-) :-) :-)
Ответить
 
 
+1 # Виктория 19.03.2017 15:59
Простите, не могли бы Вы подсказать как осуществить запись данный из файла в массив записей?
Ответить
 

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

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

   ГлавнаяПаскальФайлы в ПаскальЗапись в текстовый файл.