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)


 

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

12773. Практикум по программированию на JavaScript 728.5 KB
  Практикум по программированию на JavaScript Введение Цель этих 30 уроков состоит в том чтобы научить читателя самостоятельно создавать сценарии JavaScript. Если вы пытались ознакомиться с JavaScript с помощью книг или Интернет то почти наверняка это оказалось не просто. Изучение J...
12774. КРИТЕРИИ ОЦЕНКИ САЙТА 36.58 KB
  КРИТЕРИИ ОЦЕНКИ САЙТА Назначение этого типа оценки сайта определить основные характеристики Webсайта чтобы выявить очевидные проблемы связанные с удобством использования и исполнением. Для обнаружения недостатков в исполнении сайта которые не могут быть замечены ...
12775. Основные принципы дизайна Web-caйтa 57.86 KB
  Основные принципы дизайна Webcaйтa Введение в Webдизайн Некоторые необходимые для эффективного Webдизайна концепции. Девиз WYSIWYW What Уоu See Is What Уоu Want То что вы видите это то что вы хотите представлен в качестве возможной модификации принципа традиционного дизайна GUI ...
12776. Введение в HTML 711 KB
  Введение в HTML История развития HTML В 1989 году Тим БернерсЛи предложил проект распределенной гипертекстовой системы которую он назвал World Wide Web WWW Всемирная паутина. Первоначально идея системы состояла в том чтобы при помощи гипертекстовой навигационной системы объед...
12777. Теги тела документа 648 KB
  Теги тела документа Теги тела документа предназначены для управления отображением информации в программе интерфейса пользователя. Они описывают гипертекстовую структуру базы данных при помощи встроенных в текст контекстных гипертекстовых ссылок. Тело документа сос
12778. Использование графики в HTML 568 KB
  Использование графики в HTML Для того чтобы вставить в Webстраницу изображение необходимо либо нарисовать его либо взять уже готовое. В любой программе рисования можно создать простое изображение и сохранить его в нужном формате. Если программа этот формат не поддержива...
12779. Создание таблиц в HTML 830.5 KB
  Создание таблиц в HTML Для описания таблиц используется тег ТАВLЕ. Тег ТАВLЕ как и многие другие автоматически переводит строку до и после таблицы. Создание строки таблицы тег ТR Тег ТR Таble Row строка таблицы создает строку таблицы. Весь текст другие теги и атрибу
12780. Фреймы (FRAME) 1.16 MB
  Фреймы В какомто смысле фрейм это рамка вокруг картинки окошко или страница. Вводя тег FRAME дизайнер НТМLстраницы разделяет экран браузера на части. В результате человек просматривающий страницу может изучать только одну ее часть независимо от остального содержим
12781. ЧТО ТАКОЕ CSS 24.99 KB
  ВВЕДЕНИЕ Каскадные таблицы стилей/Cascading Style Sheets CSS это поразительное изобретение для улучшения вида ваших webсайтов. Оно поможет сэкономить уйму времени и предоставит вам совершенно новые возможности в дизайне webсайтов. CSS совершенно необходим каждому работающему с we...