Алгоритмизация и программирование процессов обработки данных в среде СУБД типа Fox
| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: оформление титульный реферата, классы реферат
| Добавил(а) на сайт: Кириана.
Предыдущая страница реферата | 8 9 10 11 12 13 14 15 16 17 18 | Следующая страница реферата
L='+---------------------+---------------------+'
@ 7,17 Say L
@ 8,17 Say '| Вид продукции | Суммарная стоимость |'
@ 9,17 Say L
* Поиск продукции с наименьшим значением стоимости
Store 0 to MinAP, LastAP
For I=1 to 5 && Цикл для пяти видов продукции
Do While .Not.EOF() && Цикл поиска нового минимума
VP=VidProd && Текущий вид продукции
RNom=RecNo() && Текущая запись
Sum Volum*Price For VidProd=VP to AllPrice
If AllPrice > LastAP
If AllPrice < MinAP Or MinAP=0
MinAP=AllPrice
MinVP=VP
EndIf
EndIf
If RNom < RecCount()
GoTo RNom+1 && Переход на следующую запись
EndIf
EndDo
* Формирование строки таблицы
@ 9+I,17 Say '|'
@ 9+I,19 Say MinVP
Рекомендуем скачать другие рефераты по теме: диплом о высшем, отчет о прохождении практики.
Категории:
Предыдущая страница реферата | 8 9 10 11 12 13 14 15 16 17 18 | Следующая страница реферата
Главная