16341

Табулирование функции. Табулирование функции одной переменной в VBA

Лекция

Информатика, кибернетика и программирование

Табулирование функции Табулирование функции одной переменной Постановка задачи. На отрезке [ab] с шагом h протабулировать функцию fx=x2Ln|x| и вывести на печать значения этой функции. Технология выполнения задания: Для решения задачи в област

Русский

2013-06-20

54 KB

72 чел.

Табулирование функции

Табулирование функции одной переменной

Постановка задачи. На отрезке [a,b] с шагом h протабулировать функцию f(x)=x2+Ln|x| и вывести на печать значения этой функции.

Технология выполнения задания:

Для решения задачи в области определения функции вводится сетка – совокупность точек {x0,x1,x2, …, xi}, где x0 = а, x1= x0+h, …, xi = xi-1+h, xn = b.

Тогда задача сводится к вычислению функции f в точках xi, то есть нужно вычислить f(x0), f(x1), …, f(xi), f(xn).

I вариант

1. Введем обозначения:

хn, xk – границы отрезка;

       h – шаг;

       х – точка;

       f – значение функции в точке.

2.Набрать в стандартном модуле проекта следующую пользовательскую процедуру, используя цикл For:

Public Sub primer1()

Dim x As Single

Dim xn As Single

Dim xk As Single

Dim h As Single

Dim f As Single

xn = InputBox("xn=", xn)

xk = InputBox("xk=", xk)

h = InputBox("h=", h)

k = 1

For x = xn To xk Step h

x = Format(x, "##.##")

f = x ^ 2 + Log(Abs(x))

f = Format(f, "##.####")

Cells(k, 1).Value = x

Cells(k, 2).Value = f

k = k + 1

Next x

End Sub

II вариант

1. Введем обозначения:

хn, xk – границы отрезка;

       h – шаг;

       х – точка;

        f – значение функции в точке .

2.Набрать в стандартном модуле проекта следующую пользовательскую процедуру, используя итерационный цикл:

Sub primer2()

Dim x As Single

Dim xn As Single

Dim xk As Single

Dim f As Single

Dim h As Single

xn = InputBox("xn=", xn)

xk = InputBox("xk=", xk)

h = InputBox("h=", h)

x = xn

k = 1

Do

Cells(k, 1).Value = x

f = x ^ 2 + Log(Abs(x))

Cells(k, 2).Value = f

x = x + h

k = k + 1

Loop While x <= xk

End Sub


Табулирование функции двух переменных (вложенные циклы)

Постановка задачи. На интервале xnxxk с шагом Δх, для каждого у из интервала уnyyk с шагом Δу вычислить значение функции z=x2+ln|y|.

Технология выполнения задания:

Для решения задачи в области определения функции вводится разностная сетка {хi, yi}, где x0 = xn, x1 = x0+hx, …, xi = xi-1+hx, …, xn=xk; y0 = yn, y1 = y0+hy, …, yj = yj-1+hy, …, ym=yk.

- количество узлов сетки по оси х,

- количество узлов сетки по оси y.

Тогда задача сводится к вычислению функции z в точках xi и yj, то есть z(xi,yj), то есть z(xi,yj)=x2+ln|y|, где i=1,2,… n, j=1,2, … m.

I вариант:

1. Введем обозначения:

             х,y – координаты узла сетки;

                 f – значение функции в нем;

хn, xk,yn,yk – границы отрезка;

          hх,hy – шаги сетки.

2.Набрать в стандартном модуле проекта следующую пользовательскую процедуру, используя цикл For:

Sub primer3()

Dim x As Single

Dim y As Single

Dim xn As Single

Dim xk As Single

Dim yn As Single

Dim yk As Single

Dim f As Single

Dim hx As Single

Dim hy As Single

xn = InputBox("xn=", xn)

xk = InputBox("xk=", xk)

yn = InputBox("yn=", yn)

yk = InputBox("yk=", yk)

hx = InputBox("hx=", hx)

hy = InputBox("hy=", hy)

k = 1

For y = yn To yk Step hy

For x = xn To xk Step hx

f = x ^ 2 + Log(Abs(y))

Cells(k, 1).Value = x

Cells(k, 2).Value = y

Cells(k, 3).Value = f

k = k + 1

Next x

Next y

End Sub

II вариант

1. Введем обозначения:

             х,y – координаты узла сетки;

                 f – значение функции в нем;

хn, xk,yn,yk – границы отрезка;

          hх,hy – шаги сетки.

2. Набрать в стандартном модуле проекта следующую пользовательскую процедуру, используя итерационный цикл

Sub primer4()

Dim x As Single

Dim y As Single

Dim xn As Single

Dim xk As Single

Dim yn As Single

Dim yk As Single

Dim f As Single

Dim hx As Single

Dim hy As Single

xn = InputBox("xn=", xn)

xk = InputBox("xk=", xk)

yn = InputBox("yn=", yn)

yk = InputBox("yk=", yk)

hx = InputBox("hx=", hx)

hy = InputBox("hy=", hy)

i = 1

y = yn

Do

x = xn

Do While x <= xk

f = x ^ 2 + Log(Abs(y))

Cells(i, 1).Value = x

Cells(i, 2).Value = y

Cells(i, 3).Value = f

x = x + hx

i = i + 1

Loop

y = y + hy

Loop Until y > yk

End Sub

PAGE  2


yn

yk

k

xn

y

z

x

а

х1

b

f(a)

f(x1)

f(b)


 

А также другие работы, которые могут Вас заинтересовать

40225. Планирование затрат 29.5 KB
  Планирование затрат. В сущности планирование затрат является одним из основных методов управления как непосредственно производством так и общеэкономической деятельностью предприятия. Вопросы планирования затрат на производство и реализацию продукции работ услуг являются непростыми задачами как стратегического так и оперативного экономического анализа. Необходимость предъявления повышенных требований к организации учета затрат на производство и реализацию продукции обусловлена тем что от правильности и своевременности определения...
40226. Прибыль как экономическая категория. Подходы к управлению прибылью 35.5 KB
  На уровне предприятия чистый доход принимает форму прибыли. Наличие прибыли на предприятии означает что его доходы превышают все расходы связанные с его деятельностью. Доля чистой прибыли оставшаяся в распоряжении предприятия после уплаты налогов и других обязательных платежей должна быть достаточной для финансирования расширения производственной деятельности научнотехнического и социального развития предприятия материального поощрения работников. Таким образом планирование прибыли является элементом системы управления прибыли которую...
40227. Управление прибылью на основе анализа безубыточности 36.5 KB
  Управление прибылью на основе анализа безубыточности. Этот метод представляет собой еще один затратный метод ценообразования при котором производится определение точки безубыточности brekeven и целевой прибыли. Анализ безубыточности осуществляется на основе исследования соотношения затраты объем прибыль которое отражает взаимосвязь затрат выручки объема производства и прибыли. По существу этот метод сводится к определению точки безубыточности производства критической точки такого объема продукции при реализации которого...
40228. Использование чистой прибыли 24.5 KB
  Использование чистой прибыли. В начале года следующего за отчетным собственники организации принимают решение о распределении чистой прибыли. Для учета нераспределенной прибыли непокрытого убытка предусмотрен счет 84 Нераспределенная прибыль непокрытый убыток . Для этого в резерв ежегодно отчисляется не менее 5 чистой прибыли.
40229. Подходы к планированию прибыли 25.5 KB
  Подходы к планированию прибыли. Важное место в финансовом планировании занимает этап планирования прибыли. Подходы к планированию прибыли зависят от параметров производственной хозяйственной и финансовой деятельности организации предприятия. Нужно изучить наиболее существенные взаимосвязи в экономике предприятия и понять их влияние на размер прибыли.
40230. Налогообложение организаций 58.5 KB
  Налог обязательный индивидуально безвозмездный платеж взимаемый с организаций и физических лиц в целях финансового обеспечения деятельности государства и или муниципальных образований. Основные функции налогов: фискальная обеспечения государства финансовыми ресурсами и регулирующая нацелена на достижение посредством налоговых механизмов тех или иных задач налоговой политики государства. Налоги оказывают значительное влияние на формирование финансовых результатов предприятия. Если налоговое бремя предприятия чрезмерно велико...
40231. Денежные потоки организации. Методы расчета. Подходы к управлению денежными потоками 27.5 KB
  Анализ денежных средств и управление денежными потоками является одним из главных направлений деятельности компании. Управление денежным потоком включает в себя расчет времени обращения денежных средств финансовый цикл анализ денежного потока его прогнозирование определение оптимального уровня денежных средств составление бюджетов денежных средств и т. Перечислим основные задачи анализа потока денежных средств: Оценка динамики и структуры источников поступления и направления расходования денежных средств. Оценка факторов оказывающих...
40232. Рентабельность как показатель эффективности деятельности организации. Система показателей. Пути повышения рентабельности 41.5 KB
  Пути повышения рентабельности.Коэффициент рентабельности рассчитывается как отношение прибыли к активам ресурсам или потокам её формирующим. Показатели рентабельности часто выражают в процентах. Система показателей Показатели рентабельности характеризуют финансовые результаты и эффективность деятельности предприятия.
40233. Инвестиционный аспект деятельности организации. Инвестиционная политика на предприятии 35.5 KB
  Временный аспект инвестиционной деятельности требует рассмотрения инвестиционного процесса и его составляющих. В первом случае инвестиционный процесс реализуется путем разработки инвестиционной политики организации во втором путем формирования и реализации конкретных информационных проектов. С одной стороны разработка и принятие к реализации инвестиционных проектов не должны противоречить выработанной инвестиционной политике. Кроме того это выражается в единстве и взаимосвязи целей инвестиционной политики и инвестиционных проектов.