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

Цель: Умение представлять результаты вычисления значения функции двух переменных в табличном виде.

Рассмотрим тему на примерах.

Задание: На интервалах с шагом и с шагом протабулировать функцию , где х - произвольное число.

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

Постановка задачи: Создать приложение вычисления значений функции z.

Математическая модель представляется так: исходные данные – x,a,b, результат – z вычисляется для каждого a и b на интервалах с шагом и с шагом .

Алгоритм решения задачи: запишем алгоритм решения поставленной задачи с помощью блок-схемы (описываем только процедуру вычисления значения функции).

Программа: Установите компоненты на форме и измените свойство Caption для каждого компонента в соответствии с рисунком 19.

Рисунок 19 - Образец размещения компонентов на форме

Для компонента BitBtn1 (кнопка Закрыть) в инспекторе объектов измените свойство Kind – bkClose.

Двойным щелчком по компоненту Button1 (кнопка Вычислить) автоматически создается в окне кода стандартная структур. В данную структуру впишите часть программы (у каждого варианта своя индивидуальная часть программы). Для данного задания эта часть выглядит следующим образом:

procedure TForm1.Button1Click(Sender: TObject);

var z,an,ak,ha,bn,bk,hb,a,b,x:real;

s:string;

begin

x:=StrToFloat(Edit1.Text);

s:=inputbox('ввод данных','an','o');

an:=StrToFloat(s);

s:=inputbox('ввод данных','ak','o');

ak:=StrToFloat(s);

s:=inputbox('ввод данных','ha','o');

ha:=StrToFloat(s);

s:=inputbox('ввод данных','bn','o');

bn:=StrToFloat(s);

s:=inputbox('ввод данных','bk','o');

bk:=StrToFloat(s);

s:=inputbox('ввод данных','hb','o');

hb:=StrToFloat(s);

a:=an;

while a<=ak+ha/2 do

begin

b:=bn;

repeat

z:=sqr(a+ln(abs(a/b-x)));

s:='a='+FloatToStr(a)+' b='+FloatToStr(b)+' z='+FloatToStr(z);

ListBox1.Items.Append(s);

b:=b+hb;

until b>bk+hb/2;

a:=a+ha;

end;

end;

Таблица 11 - Индивидуальные варианты лабораторной работы №9

№ В	Варианты индивидуальных заданий
1	На интервалах с шагом и с шагом для каждого а и b протабулировать функцию , где х - любое действительное число.

Продолжение таблицы 11

2	На интервалах с шагом и с шагом для каждого а и b протабулировать функцию , где х - любое действительное число.
3	На интервалах с шагом и с шагом для каждого а и b протабулировать функцию
4	На интервалах с шагом и с шагом для каждого а и b вычислить ,х=0.792
5	На интервалах с шагом и на интервала с шагом для каждого а и b протабулировать функцию .
6	На интервалах с шагом и для каждого а и z вычислить , причём, если , , иначе .
7	На интервалах с шагом и с шагом для каждого а и b вычислить значения функции .
8	На интервалах с шагом и с шагом для каждого а и b протабулировать функцию , причём х=0.44.
9	На интервалах с шагом и с шагом для каждого а и b вычислить , причём х=0.087.
10	На интервалах с шагом и с шагом для каждого а и b вычислить значения , где х=1.44

Продолжение таблицы 11

11	На интервалах с шагом и с шагом для каждого а и b протабулировать функцию , причём, х= 0.416.
12	На интервалах с шагом и с шагом для каждого а и b протабулировать функцию , где х - любое положительное число.