Главная Учебники - Разные Лекции (разные) - часть 32
|
Государственный
Университет
Управления
Институт
финансового
менеджмента
Лабораторная
работа №1
на
тему «Создание,
дополнение
и чтение файла
данных» Выполнила: Проверил: Несмеянов
И. А.
Задание.
Создать файл
данных со следующей
структурой:
шифр
товара,
наименование,
план
выпуска на
каждый квартал,
фактический
выпуск в каждом
квартале.
Предусмотреть
возможность
добавления
информации
и чтения данных
из файла.
Создание
файла Макет
исходных данных Кварталы
Шифр
Наиме- 1 2 3 4
товара
нование План.
выпуск Факт.
выпуск План.
выпуск Факт.
Выпуск План.
Выпуск Факт.
выпуск План.
Выпуск Факт.
выпуск 11001
Стол 30 29 30 28 30 27 30 31 11002
Стул 100 98 100 95 100 95 100 114 21001
Шкаф 25 25 25 23 25 22 25 27 21002
Кровать 30 30 30 28 30 32 30 34 31004
Кресло 20 15 20 20 20 17 20 22 Алгоритм
программы
Программа
по разработанному
алгоритму *
Командный файл
"Создание файла
данных" CLEAR
{Очистка
экрана} SET
TALK OFF {Команда
запрета выполнения
отдельных
команд} @
3,10 SAY 'Программа
создания файла
данных' ACCEPT
'Укажите имя
создаваемого
файла данных
' TO Imfd CLEAR
{Очистка
экрана} CREATE
&Imfd {Команда
создания
файла
данных} WAIT
{Команда
ожидания} RETURN
{Команда
завершения} Вариант
решения задачи Кварталы
Шифр
Наиме- 1 2 3 4
товара
нование План.
выпуск Факт.
выпуск План.
выпуск Факт.
Выпуск План.
Выпуск Факт.
выпуск План.
Выпуск Факт.
выпуск 11001
Стол 30 29 30 28 30 27 30 31 11002
Стул 100 98 100 95 100 95 100 114 21001
Шкаф 25 25 25 23 25 22 25 27 21002
Кровать 30 30 30 28 30 32 30 34 31004
Кресло 20 15 20 20 20 17 20 22
Дополнение
файла Макет
исходных данных Кварталы
Шифр
Наиме- 1 2 3 4
товара
нование План.
выпуск Факт.
выпуск План.
выпуск Факт.
Выпуск План.
Выпуск Факт.
выпуск План.
Выпуск Факт.
выпуск 11001
Стол 30 29 30 28 30 27 30 31 11002
Стул 100 98 100 95 100 95 100 114 21001
Шкаф 25 25 25 23 25 22 25 27 21002
Кровать 30 30 30 28 30 32 30 34 31004
Кресло 20 15 20 20 20 17 20 22 Алгоритм
программы
Программа
по разработанному
алгоритму *
Командный файл
"Добавления
файла данных" CLEAR
{Очистка
экрана} SET
TALK OFF {Команда
запрета выполнения
отдельных
команд} @
3,10 SAY 'Программа
добавления
файла данных' ACCEPT
'Укажите имя
добавляемого
файла данных
'TO Imfd CLEAR
{Очистка
экрана} USE
&Imfd {Команда
открытия файла
данных} APPEND
{Команда
добавления
файла
данных} WAIT
{Команда
ожидания} RETURN
{Команда
завершения} Вариант
решения задачи Кварталы
Шифр
Наиме 1 2 3 4
товара
нование План.
выпуск Факт.
выпуск План.
выпуск Факт.
Выпуск План.
Выпуск Факт.
выпуск | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||