курсовые,контрольные,дипломы,рефераты
Государственный Университет Управления
Институт финансового менеджмента
Лабораторная работа №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 |
н
Государственный Университет Управления
«Обработка файла данных»
Выполнила:
Студентка в/о, группы б/у 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 |
н
Copyright (c) 2024 Stud-Baza.ru Рефераты, контрольные, курсовые, дипломные работы.