Дано:
№ п/п
| Наймену-вання товару
| Один.
вимір.
| Кіль-кість товару
| Вартість за
одиницю
товару
| Вартість товару
|
| Фарба емаль
| Банка
|
| 18.58
|
|
| Лінолеум
| м2
|
| 12.50
|
|
| Посуд
| Компл.
|
| 249.00
|
|
| Сірники
| Короб.
|
| 0.12
|
|
| Телевізор
| Шт.
|
| 547.00
|
|
Вартість усіх товарів, всього:
|
|
Треба:
1. Ввести масив в пам’ять ПК.
2. Упорядкувати його за елементами деякого поля.
3. Обробити за певним алгоритмом і результати обробки видати на екран за заданою формою.
4. В готовому документі усі графи повинні бути заповнені.
Для одержання математичної моделі задачі вводимо позначення:
K - № п/п;
A$(i) – найменування товару;
B$(i) – одиниці вимірювання;
Kol(i) – кількість товару;
Cena(i) – вартість за одиницю;
C(i) – вартість товару;
S – вартість всіх товарів;
N – кількість рядків таблиці.
Тоді математичне формулювання задачі запишеться наступним чином:
C(i) = kol(i) * cena(i),
.
REM Програма 1
CLS
‘ Лабораторна робота № 14
‘ Обробка масиву економічної інформації
INPUT n
DIM a$(n), b$(n), kol(n), cena(n), c(n)
' Ввід масиву в пам’ять ПК.
PRINT TAB(15); "Вхідний масив інформації"
FOR i = 1 TO n
READ a$(i), b$(i), kol(i), cena(i)
PRINT a$(i), b$(i), kol(i), cena(i)
NEXT i
'Упорядкувати масив за найменуваннями товарів за абеткою.
FOR p = 1 TO n - 1
FOR i = 1 TO n - 1
IF a$(i) > a$(i + 1) THEN
SWAP a$(i), a$(i + 1)
SWAP b$(i), b$(i + 1)
SWAP kol(i), kol(i + 1)
SWAP cena(i), cena(i + 1)
END IF
NEXT i
NEXT p
' Обчислити вартість кожного товару та усіх товарів і результат видати на екран у вигляді таблиці.
PRINT
PRINT TAB(26); "Р Е З У Л Ь Т А Т И"
PRINT TAB(15); "обробки масиву економічної інформації"
PRINT TAB(10); "------------------------------------------------------"
PRINT TAB(10); ": N: Найменування:Один.:Кіл-ть:Ціна за:Вартість:"
PRINT TAB(10); ":n/n:товару:вимір:товару:одиницю:товару:"
PRINT TAB(10); "------------------------------------------------------"
k = 0: s = 0
FOR i = 1 TO n
k = k + 1: c(i) = kol(i) * cena(i): s = s + c(i)
PRINT TAB(10); ":"; k;
PRINT TAB(14); ":"; a$(i);
PRINT TAB(31); ":"; b$(i);
PRINT TAB(37); ":"; USING "####"; kol(i);
PRINT TAB(44); ":"; USING "###.##"; cena(i);
PRINT TAB(52); ":"; USING "#####.##"; c(i);
PRINT TAB(62); ":"
NEXT i
PRINT TAB(10); "------------------------------------------------------"
PRINT TAB(15); "Вартість усіх товарів, всього";
PRINT TAB(52); s
END
DATA Телевізор,шт,35,547
DATA Сірники,короб,257,.12
DATA Посуд,компл,148,249
DATA Фарба емаль,банка,47,18.58
DATA Лінолеум,м.кв.,457,12.50
Результат виконання програми:
Вхідний масив інформації
Телевізор
| шт.
|
| 547.00
|
Сірники
| короб
|
| 0.12
|
Посуд
| компл
|
| 249.00
|
Фарба емаль
| банка
|
| 18.58
|
Лінолеум
| м.кв.
|
| 12.50
|
№ п/п
| Найменування товару
| Один.
вимір.
| Кіль-ть товару
| Ціна за
одиницю
| Вартість товару
|
| Фарба емаль
| банка
|
| 18.58
| 873.26
|
| Лінолеум
| м.кв.
|
| 12.50
| 5712.50
|
| Посуд
| компл
|
| 249.00
| 36852.00
|
| Сірники
| короб
|
| 0.12
| 30.84
|
| Телевізор
| шт.
|
| 547.00
| 19145.00
|
Вартість усіх товарів, всього:
| 62613.60
|
Контрольні запитання
1. В чому полягає підготовча робота до написання програми?
2. Як упорядкувати масив за елементами деякого поля?
Варіанти завдань.
Для задачі, вибраної відповідно свого номера варіанта, скласти:
- математичну модель;
- алгоритм розв’язання задачі;
- програму обчислення недостатніх даних в конкретному документі та друку заповненої таблиці цього документу.
ЗАВДАННЯ
1. Визначити продуктивність праці, середню заробітну платню, затрати на випуск продукції:
Артикул тканин
| Випуск продукції, м
| Чисельність, чол
| Фонд заробітної плати, крб
| Відроблені години, год
| Продуктивність праці (гр.2:гр.3)
| Середня заробітна плата (гр.4:гр.3),грн
| Затрати на випуск продукції (гр.2:гр.3:гр.5), чол.-год
|
|
|
|
|
|
|
|
|
|
|
|
| 163,1
|
|
|
|
|
|
|
| 163,1
|
|
|
|
|
|
|
| 163,1
|
|
|
|
|
|
|
| 163,1
|
|
|
|
2. Знайти об’єм товарної та чистої продукції виробів товарів народного споживання (ялинкові прикраси) в грошовому виразі:
Найменування виробів
| Ціна за 1000 шт.
| Випуск товарної
продукції,
тис. шт.
| Об’єм товарної
продукції
(гр.2*гр.4)
| Об’єм чистої продукції
(гр.3*гр.4)
|
оптова
| чистої продукції
|
|
|
|
|
|
|
Дощик
|
| 9.97
|
|
|
|
Фонарик
|
| 198.24
|
|
|
|
Гірлянда
"Новорічна"
|
| 174.76
|
|
|
|
Сніжинка
|
| 333.69
| 5,5
|
|
|
Гірлянда
"Ялинка"
|
|
70.97
|
11,5
|
|
|
Всього:
|
|
|
|
|
|
3. Обчислити норму амортизації та остаточну вартість основних фондів, грн.: Ні = (Пі +кі – dі + Ді *100) / Пі Ті;
Cі = Пі+ Кі – Ні Пі Ті / 100,
де
Пі - початкова вартість (3000, 2500, 3200, 2000, 1500);
Кі - затрати на капремонт (1500, 1500, 200, 1500, 3000);
dі - ліквідаційна вартість (600, 800, 1200, 1500, 1000);
Ді - затрати на демонтаж (600, 800, 800, 1500, 3000);
Ті - строк фізичної служби (5, 3, 4, 4, 5).
Надрукувати таблицю з вхідними даними та результатами обчислень.
4. По даним нарядів робочого визначити його заробіток та нормативний час на партію виготовлених деталей:
Номер
заказа
| На одиницю виробу
| Кількість
виробів
| На всю партію
| |
Час по нормі (гр.2*гр.4), год.
| Сума (гр.3*гр.4),
грн.
| |
Норма часу
| Розцінка,
грн
| |
|
|
|
|
|
| |
| 0,38
| 0,88
|
|
|
| |
| 0,50
| 0,48
|
|
|
| |
| 0,39
| 0,55
|
|
|
| |
| 0,61
| 0,64
|
|
|
| |
| 0,57
| 0,80
|
|
|
| |
5. Скласти програму для отримання оборотної відомості по обліку матеріалів у грошовому вираженні:
Номенклатурний номер
| Залишок на початок місяця
| Надходження
| Витрати
| Залишок на кінець місяця (гр.2+гр.3- гр.4)
|
|
|
|
|
|
| 1635,82
| 1680,40
| 3205,45
|
|
| 1281,34
| 3982,81
| 2528,24
|
|
| 8684,00
| 7200,00
| 2508,25
|
|
| 10202,41
| 1280,50
| 8280,00
|
|
Всього:
|
|
|
|
|
6. Визначити собівартість панчішно-шкарпеткових виробів по панчішній фабриці, виходячи з наступних даних:
Артикул
та розмір
виробу
| Витрати виробництва,
грн.
| Кількість випущених виробів, пар
| Собівартість однієї пари виробу
(гр.2: гр.3), грн.
|
|
|
|
|
7036/12
| 1374,5
|
|
|
7036/13
| 1539,74
|
|
|
7036/14
| 1011,96
|
|
|
7036/16
| 939,70
|
|
|
7042/13
| 1396,39
|
|
|
Всього:
|
|
|
|
7. Визначити вартість незавершеного виробництва електродвигунів за плановими та нормативними цінами:
Тип
електродвигуна
| Кіль-ть електродвигунів, шт.
| Планова вартість,
грн.
| Нормативна вартість, грн.
|
Ціна
| Сума
(гр.2 * гр.3)
| Ціна
| Сума
(гр.2 * гр.5)
|
|
|
|
|
|
|
4А225
|
|
|
|
|
|
4АИУМ
|
|
|
|
|
|
АИР-90
|
|
|
|
|
|
4ВАО-125
|
|
|
|
|
|
4А250
|
|
|
|
|
|
Всього:
|
|
|
|
|
|
8. Отримати відомість результатів інвентаризації:
Найменування товару
| Залишок
| Фактична наявність
| Результати інвентаризації
|
Кількість
| Сума
| Кількість
| Сума
| Кількість
(гр. 4 – гр.2)
| Сума
(гр. 5 – гр. 3)
|
Надлишки
| Недостача
| Надлишки
| Недостача
|
|
|
|
|
|
|
|
|
|
Бязь
|
| 1024,15
|
| 1221,36
|
|
|
|
|
Сатин
|
| 98,00
|
| 75,42
|
|
|
|
|
Міткаль
|
| 481,40
|
| 491,13
|
|
|
|
|
Поплін
|
| 856,62
|
| 678,70
|
|
|
|
|
Всього:
|
|
|
|
|
|
|
|
|
9. Отримати відомість визначення суми затрат за місяць на виробництво продукції в грошовому виразі:
Прилад
| Зарплата
| Матеріали
| Цехові
витрати
| Витрати на утримання та експлуатацію обладнання
| Всього
витрат
|
2В116
|
|
|
|
|
|
КД116
|
|
|
|
|
|
2Д528
|
|
|
|
|
|
2Д922
|
|
|
|
|
|
Всього:
|
|
|
|
|
|
10. За даними нарядів робочого визначити його заробіток та нормативний час на партію виготовлених виробів:
Номер
заказа
| На одиницю виробу
| Кількість
виробів
| На всю партію
| |
Час по нормі (гр.2*гр.4), год.
| Сума (гр.3*гр.4),
грн.
| |
Норма часу
| Розцінка,
грн
| |
|
|
|
|
|
| |
| 0,15
| 0,54
|
|
|
| |
| 0,30
| 0,65
|
|
|
| |
| 0,32
| 0,38
|
|
|
| |
455
| 0,25
| 0,67
|
|
|
| |
Всього:
|
|
|
|
|
| |
11.Отримати оборотну відомість наступної форми:
Номен-
клатур-
ний
номер
| Сальдо
вхідне
| Надходження
| Витрати
| Сальдо вихідне
(гр.2+гр.3-гр.4)
|
Негативне
| Позитивне
|
|
|
|
|
|
|
| 11366,42
| 5122,20
| 4880,95
|
|
|
| 8562,20
| 39660,43
| 81894,26
|
|
|
| 8765,45
| 18920,44
| 21864,00
|
|
|
| 12842,00
| 8264,39
| 40969,86
|
|
|
| 25648,82
| 6225,00
| 60890,95
|
|
|
Всього:
|
|
|
|
|
|
12. Отримати "Відомість витрати палива" наступної форми:
Номер машини
| Табельний номер водія
| Залишок на початок місяця
| Отримано на бензоколонці
| Витрати палива фактично
(гр.3+ гр.4)
| Витрати палива нормативні
| Результат
(гр.6-гр.5)
|
Економія
| Перевитрати
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Всього:
|
|
|
|
|
|
|
13. Начислити прибутковий податок (ПП), враховуючи, що:
а) до70 грн. - ПП не сплачується;
б) 71-77 грн. -ПП обчислюється по таблиці:
Місячний
заробіток, грн.
|
|
|
|
|
|
|
|
Прибутковий податок, грн.
| 0,25
| 0,59
| 0,93
| 1,30
| 1,65
| 2,00
| 2,39
|
в) 78-90 грн. - ПП обчислюється за формулою
ПП=0,34*(ЗЦ-77)+2,39;
г) 91-100 грн. - за формулою
ПП= 0,12*(ЗЦ-90)+7;
д) 101 грн. та вище - за формулою
ПП =0,13*(ЗЦ-100)+8,2,
де ЗЦ - це ціла частина від З (суми зарплатні);
З=(74.60; 90.41; 68.30; 70.99; 106.80; 95.15; 291.65; 76.85; 98.00; 90.90).
Їм відповідають наступні табельні номери:
N=(1380;1399;1401;1402;1403;1415;1426;1428;1432).
Вивести документ у вигляді таблиці з назвами граф: табельний номер, сума зарплатні, прибутковий податок.
14. Визначити випуск виробів у грошовому виразі на виробництві, виходячи з наступних даних:
Номенкла-
турний номер
виробу
| Ціна виробу, грн.
| Кількість
виробів
| Виготовлено виробів на суму, грн.
| Відхилення,
грн.
|
План
| Факт
| План
(гр.2*гр.3)
| Факт
(гр.2*гр.4)
|
|
|
|
|
|
|
|
| 7,70
|
|
|
|
|
|
| 5,40
|
|
|
|
|
|
| 9,30
|
|
|
|
|
|
| 6,40
|
|
|
|
|
|
| 8,70
|
|
|
|
|
|
Всього:
|
|
|
|
|
|
|
15. Визначити собівартість виробу, виходячи з таких даних:
Шифр
виробу
| Витрати виробництва, грн.
| Випущено виробів, шт.
| Собівартість одиниці виробу (гр.2:гр.3), грн.
|
|
|
|
|
| 26897,60
|
|
|
| 31491,80
|
|
|
| 25884,30
|
|
|
| 44870,00
|
|
|
| 52848,50
|
|
|
| 18700,00
|
|
|
| 34780,40
|
|
|
| 61388,70
|
|
|
Всього:
|
|
|
|
16. Отримати відомість потреби матеріалів на виготовлення деталей в грошовому виразі:
Номенклатура матеріалу
| Норма витрат матеріалів на одну деталь, кг.
| Кількість
деталей за
планом, шт.
| Ціна 1 кг.
грн.
| Сума (гр.2*гр.3*
*гр.4)
|
|
|
|
|
|
| 1,6
|
| 0,20
|
|
| 2,8
|
| 0,15
|
|
| 0,5
|
| 0,23
|
|
| 1,4
|
| 0,17
|
|
| 1,1
|
| 0,13
|
|
Всього:
|
|
|
|
|
17. Отримати відомість обліку незакінченого виробництва:
Шифр
| Заробітна
плата
| Матеріальні витрати
| Цехові витрати
| Накладні витрати
| Всього
(гр.2+гр.3+
+гр.4+гр.6)
|
|
|
|
|
|
|
| 388,45
| 282,80
| 12,65
| 150,72
|
|
| 419,05
| 367,08
| 15,44
| 233,80
|
|
| 280,27
| 255,04
| 48,90
| 110,28
|
|
| 584,50
| 190,00
| 29,28
| 105,26
|
|
| 197,24
| 524,86
| 18,82
| 161,25
|
|
| 336,98
| 849,54
| 21,47
| 95,80
|
|
Всього:
|
|
|
|
|
|
18. Отримати документ “ Видаткова накладна “:
Порядковий
номер
| Найменування товару
| Кількість
| Відпускна
ціна
| Сума
(гр3 * гр.4)
| Продажна
|
Ціна
| Сума
(гр.3* гр.6)
|
|
|
|
|
|
|
|
| Олово
|
| 5,50
|
| 8,50
|
|
| Латунь
|
| 10,20
|
| 12,90
|
|
| Срібло
|
| 21,90
|
| 24,00
|
|
| Бронза
|
| 14,25
|
| 14,18
|
|
Всього:
|
|
|
|
|
|
|
19.Отримати відомість затрат на технічний ремонт шляхів підприємства, грн:
Види
робіт
| Оплата
праці
| Витрати
матеріалів
| Затрати
на авто-
транспорт
| Накладні витрати
| Всього
(гр.2+гр.3+
+гр.4+гр.5)
|
|
|
|
|
|
|
Ремонт покриття
| 2764,38
| 1981,20
| 716,32
| 191,56
|
|
Ремонт бордюра
| 698,00
| 504,10
| 18,86
| 93,11
|
|
Підсипка
залізниці
| 1238,11
| 1210,84
| 9930,19
| 181,15
|
|
Всього:
|
|
|
|
|
|
20. Отримати документ “Платіжна вимога”:
№
п/п
| Номенклатурний
номер
| Найменування
| Одиниця виміру
| Кількість
| Ціна
| Сума
|
|
|
|
|
|
|
|
|
| мідь
| кг
|
| 8,60
|
|
|
| чавун
| кг
|
| 4,25
|
|
|
| олово
| кг
|
| 6,90
|
|
|
| гайка
| шт.
|
| 2,95
|
|
|
| вал
| шт.
|
| 3,20
|
|
Всього:
|
|
|
Знижка 5 %
|
|
|
Всього:
|
|
|
21. Знайти об’єм товарної та чистої продукції:
Найменування виробу
| Ціна за 1000 пар
| Випуск
тис. пар
| Об’єм товарної
продукції (гр.2*гр.4)
| Об’єм
чистої
продукції
(гр.2 * гр.4)
|
Оптова
| Чиста
продукція
|
Колготки
| 120-00
| 80-50
|
|
|
|
Гольфи
| 20-40
| 10-00
|
|
|
|
Шкарпетки
| 60-00
| 20-50
|
|
|
|
Панчохи
| 40-20
| 10-80
|
|
|
|
Всього:
|
|
|
|
|
|
22. Визначити суму наданих комунальних послуг на одного працюючого в рік, виходячи з наступних даних:
Вид послуги
| Сума
| Кількість працівників
| Сума комунальних
послуг на одного працюючого в рік
|
|
|
|
|
Освітлення
| 948,60
|
|
|
Опалення
| 641,20
|
|
|
Паливо
| 2840,84
|
|
|
Квартира
| 940,62
|
|
|
Всього:
|
|
|
|
23. Отримати документ “Платіжна вимога”:
Номенклатурний
номер
| Найменування
| Одиниця виміру
| Кількість
| Ціна
| Сума
(гр.4*гр.3), грн.
|
|
|
|
|
|
|
| Папір
| кг.
|
| 0,24
|
|
| Олівець
| шт.
|
| 0,08
|
|
| Скріпки
| шт.
|
| 0,12
|
|
| Кнопки
| шт.
|
| 0,06
|
|
Всього:
|
|
Знижка 15 %
|
|
Всього:
|
|
24. Отримати документ “Рахунок-фактура “:
№
п/п
| Номенклатурний
номер
| Найменування
| Одиниця виміру
| Кількість
| Ціна
| Сума
(гр.4*гр.3), грн.
|
|
|
|
|
|
|
|
|
| Шайба
| шт.
|
| 12,25
|
|
|
| Срібло
| кг.
| 318,5
| 489,75
|
|
|
| Свинець
| кг.
| 590,0
| 18,58
|
|
Всього:
|
|
Націнка 8 %
|
|
Всього:
|
|
25. Скласти програму для отримання оборотної відомості по обліку матеріалів в грошовому виразі:
Номенклатурний
номер
| Залишок на
початок місяця
| Надходження
| Витрати
| Залишок на кінець місяця (гр.2+гр.3-гр.4)
|
|
|
|
|
|
| 1635,82
| 1680,40
| 3205,45
|
|
| 1281,34
| 3982,81
| 2528,24
|
|
| 3420,35
| 428,56
| 829,37
|
|
| 8684,00
| 7200,00
| 508,25
|
|
| 10202,41
| 1280,50
| 8280,00
|
|
Всього:
|
|
|
|
|
26. Визначити суму витрат на виробництво продукції:
Культура
| Оплата
праці
| Посівний матеріал
| Добрива
| Затрати на
роботу автотранспорту
| Накладні
витрати
| Всього
затрат
|
Кукурудза
|
|
|
|
|
|
|
Соняшник
|
|
|
|
|
|
|
Цукровий буряк
|
|
|
|
|
|
|
Картопля
|
|
|
|
|
|
|
Всього:
|
|
|
|
|
|
|
27. Отримати “Відомість нарахування зарплати у бригаді”:
Табельний номер
| Кількість
відробл. годин
| Годинна
тарифна
ставка,
грн.
| Зарплата по тарифу
(гр.2*гр.3), грн
| Коефіцієнт
розподілу
| Сума зарплати (гр.4*гр.5), грн
|
|
| 6.44
|
| 1,5
|
|
|
| 8.48
|
| 1,8
|
|
|
| 0.39
|
| 1,3
|
|
Всього:
|
|
|
|
|
|
28. Отримати відомість потреби матеріалів на виготовлення деталей в грошовому виразі:
Номенклатура матеріалу
| Норма витрат на одну
деталь, кг.
| Кількість
деталей по
плану, шт.
| Ціна за 1 кг,
грн.
| Сума, грн
(гр.2*гр.3*гр.4), грн.
|
|
|
|
|
|
| 1,3
|
| 0,12
|
|
| 0,9
|
| 0,18
|
|
| 1,2
|
| 0,15
|
|
| 0,8
|
| 0,10
|
|
Всього:
|
|
|
|
|
29.Отримати відомість затрат на будівництво гуртожитку, тис. грн:
Види
робіт
| Матеріали
| Доставка
| Зарплата
| Інші затрати
| Всього
(гр.2+гр.3+
+гр.4+гр.5)
|
|
|
|
|
|
|
Фундамент
| 3120,530
| 760,202
| 716,327
| 391,56
|
|
Корпус
| 4560,020
| 1404,105
| 680,865
| 593,111
|
|
Покрівля
| 1170,254
| 1210,84
| 990,193
| 181,152
|
|
Всього:
|
|
|
|
|
|
30. Отримати документ “Платіжна вимога”:
№
п/п
| Номенклатурний
номер
| Найменування
| Одиниця виміру
| Кількість
| Ціна
| Сума
|
|
|
|
|
|
|
|
|
| болт
| кг
|
| 18,60
|
|
|
| шайба
| кг
|
| 2,25
|
|
|
| гвинт
| кг
|
| 16,90
|
|
|
| гайка
| кг
|
| 4,95
|
|
|
| шуруп
| кг
|
| 23,58
|
|
|
| вал
| шт
|
| 233,20
|
|
Всього:
|
|
|
Знижка 14 %
|
|
|
Всього:
|
|
|