Компьютерная подготовка

Государственный
Университет
Управления

Институт
финансового
менеджмента

Лабораторная
работа №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
товара	нование	План. выпуск	Факт. выпуск	План. выпуск	Факт. Выпуск	План. Выпуск	Факт. выпуск	План. Выпуск	Факт. выпуск
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
41001	Пуфик	10	7	10	5	10	3	10	9
51001	Журн. Столик	15	12	15	10	15	9	15	14
61003	Книжная полка	20	19	20	18	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 {Команда
открытия файла

данных}

LIST
{Команда
чтения файла

данных}

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

н

Государственный
Университет
Управления

Институт
финансового
менеджмента
Лабораторная
работа №2

«Обработка
файла данных»

Выполнила:

Студентка
в/о, группы б/у
II-1

Кузнецова
Анна

Задание.
Данные по машинам
автобазы: номер,
марка, план
перевозок,
факт. Вывести
данные по машинам,
по которым не
выполнен план
перевозок.

Макет
исходных данных

номер	марка	план	факт
о 367 нр	ГАЗ	105	100
л 577 ор	ЗИЛ	185	185
н 705 ар	КамАЗ	220	220
в 368 еу	ЛИАЗ	343	340
а 859 ср	МАЗ	368	368
у 364 ар	УАЗ	373	373
м 290 ао	КамАЗ	288	287
н 390 ал	ГАЗ	100	99

Алгоритм
программы

Программа
по разработанному
алгоритму

*
Командный файл
"Обработка
файла данных"

CLEAR
{Очистка
экрана}

SET
TALK OFF {Команда
запрета выполнения

отдельных
команд}

USE
&Imfd {Команда
открытия}

TEXT

Данные
по машинам по
которым не
выполнен перевозок

номер
марка план
факт

ENDTEXT

I=1
{определяет
номер строки}

DO
WHILE .NOT.EOF()

IF PLAN>FACT

@ I,3 SAY NOM

@ I,15 SAY MAR

@ I,22 SAY
PLAN

@ I,28 SAY
FACT

I=I+1

ENDIF

SKIP

ENDDO

WAIT
{Команда
ожидания}

RETURN
{Команда
завершения}

Вариант
решения задачи

номер	Марка	план	факт
о 367 нр	ГАЗ	105	100
в 368 еу	ЛИАЗ	343	340
м 290 ао	КамАЗ	288	287
н 390 ал	ГАЗ	100	99

н