close

Вход

Забыли?

вход по аккаунту

?

Лабораторная работа №2

код для вставкиСкачать
Лабораторная работа №2
“Реализация разветвляющихся алгоритмов”
Подготовил: Ярошенко Александр
Группа: 313801
Условие:
14. y  b cos[a( x)]  sin
x
 aex
5
где
 z ; z  0;
x
3z  1; z  0.
Код:
#include <math.h>
//--------------------------------------------------------------------------double x,f;
double a=StrToFloat(Edit1->Text);
double b=StrToFloat(Edit2->Text);
double z=StrToFloat(Edit3->Text);
if (z>0)
{
x=sqrt(z); Memo1->Lines->Add("z>0, x=sqrt(z) => x="+FloatToStr(x));
};
if (z<=0)
{
x=3*z+1; Memo1->Lines->Add("z<=0, x=3z+1 => x="+FloatToStr(x));
};
switch(RadioGroup1->ItemIndex)
{
case 0:{
f=2*x;
Memo1->Lines->Add("Функция f(x)=2x");
} break;
case 1:
f=x*x;
Memo1->Lines->Add("Функция f(x)=x^2"); break;
case 2: f=x/3;
Memo1->Lines->Add("Функция f(x)=x/3"); break;
}
double y=b*cos((a*f))+sin(x/5)+a*exp(x);
Memo1->Lines->Add("y=" +FloatToStrF(y,ffFixed,8,3));
}
//---------------------------------------------------------------------------
При значениях: функция=2*x, z=9 (x=sqrt(z)=3), a=1, b=1; y=b*cos((a*f))+sin(x/5)+a*exp(x)=
21,610;
При значениях: функция =x*x, z=4 (x=sqrt(z)=2), a=1, b=1, y=b*cos((a*f))+sin(x/5)+a*exp(x)=
7,125;;
При значениях: функция =x/3, z=1 (x=sqrt(z)=1), a=1, b=1, y=b*cos((a*f))+sin(x/5)+a*exp(x)= 3,862;
При значениях: функция =2*x, z=-1 (x=3*z+1=-2), a=1, b=1, y=b*cos((a*f))+sin(x/5)+a*exp(x)=
0,908;
При значениях: функция =x*x, z=-2 (x=3*z+1=-5), a=1, b=1, y=b*cos((a*f))+sin(x/5)+a*exp(x)=
0,156;
При значениях: функция =x/3, z=-3 (x=3*z+1=-8), a=1, b=1, y=b*cos((a*f))+sin(x/5)+a*exp(x)=
1,889;
Ввод значений
переменных: a,b,z
Если z>0,
x=sqrt(z)
Пров
еряе
мz
Иначе,
x =3*z+1
Выбираем одну из
трёх функций
Функция = x/3
Функция = x*2
Функция = x*x
Вычисляем значение
y для данного числа.
Вычисляем значение
y для данного числа.
Выводим результат
на экран.
Вычисляем значение y
для данного числа.
Документ
Категория
Рефераты
Просмотров
16
Размер файла
50 Кб
Теги
работа, лабораторная
1/--страниц
Пожаловаться на содержимое документа