Варианты задания 3
1. Вычислить уровень выполнения плана розничного товарооборота
P
=
100, где F - фактический розничный
товарооборот,
T - план розничного товарооборота.
2. Рассчитать степень новизны изделия
*100,
где M - сумма высших рангов новизны
изделия,
K - число баллов, характеризующих новизну анализируемого изделия.
3. Рассчитать эстетический показатель качества товаров
,
где R - значение обобщенного эстетического
показателя,
N - число экспертов.
4. Вычислить коэффициент стабильности ассортимента товаров
, где
N - количество проверок,
K1 - количество разновидностей товаров в момент проверки,
K2 - количество разновидностей товаров, предусмотренных ассортиментным минимумом.
5. Вычислить номинальную цену акции
,
где Рn
– номинальная цена акции,
Сар – уставный капитал акционерного общества,
М – число выпущенных акций.
6. Определить котировку акции на вторичном рынке ценных бумаг
где К – курс акции,
Рr – рыночная цена акции, Pn – номинальная
цена акций.
7. Рассчитать конечную сумму по погашению долга с процентами:
S = P * (1 + n * i), где S – наращенная сумма долга,
Р – первоначальная сумма ссуды,
n – срок кредита,
i – процентная ставка.
8. Вычислить величину разового погасительного платежа.
, где
R
– величина разового погасительного
платежа,
S – наращенная сумма долга,
m – число платежей в год,
n – срок кредита.
9. Найти балансовую прибыль предприятия
ПБ = П + ПП +ПВ,
где ПБ – прибыль балансовая,
П – прибыль от реализации,
ПП– прибыль от прочей реализации,
ПВ – прибыль от внереализационных доходов.
10. Рассчитать долю населения трудоспособного возраста в общей численности населения.
D = TH / H,
где D – долю населения трудоспособного возраста,
ТН – трудовое население,
Н – все население.
Лабораторная работа №3 Тема: Разработка программ разветвленной структуры в среде vba.
Цель работы:
Применить умения при составлении алгоритма решения задачи в виде блок-схемы.
Освоить приемы программирования разветвлений.
Получить навыки составления программ разветвленной структуры.
Ход работы:
1) Понятие разветвленной вычислительной структуры.
Разветвлённая алгоритмическая структура применяется в том случае, когда в зависимости от условия необходимо выполнить одно или другое действие. Действия могут содержать одну или несколько операций
Пример 2. Составить в виде блок-схемы и программы алгоритм назначения стипендии студентам в зависимости от среднего балла сессии.
Решение: Пусть стипендия не назначается тем студентам, у которых средний балл меньше 4, поэтому в алгоритме необходимо проверить это условие. В зависимости от введённого значения Среднего_балла условие может принять значение <4, тогда выполняется действие по ветви Да. Если условие принимает значение >4, то выполняется действие по ветви Нет.
Блок-схема данного алгоритма имеет вид (рис 17):
Рис. 17 Блок-схема алгоритма Пример 2
2) Реализовать данную программу в среде VBA Microsoft Excel для Средний_балл<4:
Sub Пример2( )
Dim Средний_балл As Single
Dim Назнач_стипендии As String
Средний_балл = InputBox("Введите средний балл сессии", "Окно ввода")
If Средний_балл < 4 Then
Назнач_стипендии = "Нет"
Else
Назнач_стипендии = "Да"
End If
MsgBox "Назначать стипендию?" & Назнач_стипендии
End Sub
На экран монитора будет выведено диалоговое окно с ответом, характеризующим решение для условия Средний_балл<4.