Решение задач сводится к табулированию функции в заданных интервалах. Для их решения надо организовать цикл для вычисления функции при различных значениях аргумента, изменяющегося с определенным шагом.
Пример. Составить программу расчета уровня рентабельности (%) по формуле:
,
где Ц − цена реализации 1 ц продукции, руб.; ПС − полная себестоимость 1 ц продукции, руб.
Цена реализации 1 ц продукции изменяется в пределах от 500 до 600 руб. с шагом 10 руб. (ПС = 550 руб.).
Решение. В данном примере функцией является величина уровня рентабельности, а аргументом − цена реализации 1 ц продукции.
Для составления программы перейдем от символов в задаче к символам языка Vizual BASIC: Р ® p, Ц ® c, ПС ® ps.
Программа расчета уровня рентабельности с использованием оператора условного перехода имеет вид:
Show
Print "РАСЧЕТ УРОВНЯ РЕНТАБЕЛЬНОСТИ"
рs = InputBox(“ПС = “)
Let с = 500
Metka
Let p = (c - ps) / ps * 100
Print c,p
Let c = c + 10
If c <= 600 Then Go To Metka
В программе оператор Show делает результаты решения задачи видимыми. Оператор Print выводит на экран дисплея название программы. Оператор InputBox осуществляет ввод числового значения переменной ps (полной себестоимости 1 ц продукции). Оператор Let присваивает переменной c значение 500 (нижний предел изменения цены реализации 1 ц продукции). Следующий оператор Let вычисляет значение переменной p (уровень рентабельности). Оператор Print выводит на экран дисплея значения переменных c и p (цену реализации 1 ц продукции и уровень рентабельности). Оператор Let увеличивает значение переменной c на шаг 10. Оператор If осуществляет разветвление вычислительного процесса: если c £ 600, то управление передается метке Metka, в противном случае − на конец программы.
|
|
При использовании операторов цикла программа принимает вид:
Show
Print "РАСЧЕТ УРОВНЯ РЕНТАБЕЛЬНОСТИ"
рs = InputBox(“ПС = “)
For c = 500 To 600 Step 10
Let p = (c - ps) / ps * 100
Print c,p
Next c
Цикл в программе организуется с помощью операторов заголовка цикла For...To..Step и конца цикла Next. В первом вслед за словом For указано начальное значение цены реализации 1 ц продукции, за словом To − конечное значение, а после слова Step − шаг изменения цены реализации. Выход из цикла происходит как только значение переменной c превысит значение 600.
ОГЛАВЛЕНИЕ
Раздел 1. Общие методические указания по изучению дисциплины………...… 3
Раздел 2. Содержание учебных модулей дисциплины и методические
указания по их изучению…………………………………………….… 6
Раздел 3. Задания для контрольной работы и методические указания по их изучению..…………………………………………………………......16
________________