Сборник заданий для практических занятий по информатике. Крупенников О.Г - 85 стр.

UptoLike

84
– WRITE (<F>,<список ввода>) – процедура записи информации в
файл. То же, что и процедура WRITE для текстовых файлов, но список
вывода представляет собой переменные того же типа, что и компоненты
файла.
FILE POS (<F>) – функция номера текущей компоненты файла.
Возвращает номер текущей компоненты файла, с которым связана файло-
вая переменная F. Нумерация компонент начинается с нуля.
FILE SIZE (<F>) – функция текущего размера файла. Возвращает
текущий размер файла, с которым связана файловая переменная F, в ком-
понентах этого файла.
Пример 9.3. Вычислить сумму двух матриц из целых чисел размером
(2×3) и записать результат в файл MATR.DAT на диске С.
PROGRAM SUMMATR;
USES CRT;
VAR A,B,C: ARRAY [1..2,1..3] OF INTEGER;
I,J: INTEGER;
SUM: FILE OF INTEGER;
BEGIN
CLRSCR;
FOR I:=1 TO 2 DO
FOR J:=1 TO 3 DO
BEGIN
WRITE(’ВВЕДИТЕ А[‘,I,J,’]-’);
READLN(A[I,J])
END;
FOR I:=1 TO 2 DO
FOR J:=1 TO 3 DO
BEGIN
WRITE(’ВВЕДИТЕ B[‘,I,J,’]-’);
READLN(B[I,J])