Реферат Обробка набору даних, представленого у вигляді файлу

Тема: Новые рефераты

ozdanienab; fail: file of zapis;: zapis;, n, tg: integer;: string;

{введення імені створюваного файлу}

{зв'язування змінної fail з набором даних}

{відкриття файлу fail для запису}

{введення кількості елементів n} i:=1 to n do

{введення даних}

{запис даних у файл};

{end for i:=1 to n}

{закриття файлу};

1.3 Опис модуля dobavlenie.tpu

У модулі dobavlenie.tpu описана процедура dobavleniek і типи, необхідні для роботи з безліччю даних.

Описова частина модуля:

dobavlenie; vivod; dopsredstva=(faxmodem, modem, fax, nety);=record: byte;: string;: longint;: integer;: dopsredstva;; dobavleniek (name: string);

Процедура dobavleniek додає елементи в кінець набору даних. У цю процедуру передається змінна name (ім'я файлу).

Псевдокод процедури dobavleniek:

procedure dobavleniek; fail: file of zapis;: zapis;, n, tg, max: integer;, oplatastr: string;

{зв'язування змінної fail з набором даних}

{відкриття файлу fail для запису}

{пошук останнього ел-та і установка покажчика в кінець файлу}

{введення запланованого додаються елементів} i:=max +1 to n + max do

{введення даних}

{запис даних у файл};

{end for}

{закриття файлу}

{висновок нд};

1.4 Опис модуля vivod.tpu

У модулі vivod.tpu описана процедура vivodnab і типи, необхідні для роботи з безліччю даних.

Описова частина модуля:

vivod; crt; dopsredstva=(faxmodem, modem, fax, nety);=record: byte;: string;: longint;: integer;: dopsredstva;; vivodnab (name: string);

Процедура vivodnab забезпечує виведення набору даних на екран у вигляді таблиці і скролінг таблиці, якщо вона не поміщається у вікні. У цю процедуру передається змінна name (ім'я файлу).

Псевдокод процедури vivodnab:

vivodnab; stroka: array [1 .. 50] of string [80];: integer;: zapis;, oplatastr: string;: file of zapis;, m, a, l: integer; : char;

{зв'язування змінної fail з нд і відкриття файлу}

{ініціалізація k}

{ініціалізація stroka [1] і stroka [2]}

{читання даних з файлу}

{переклад даних в рядковий тип}

{запис рядків таблиці в масив рядків}

{підготовка наступної ітерації} eof (fail);

{end repeat}

{ініціалізація останнього рядка}

{відключення курсора}