Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Haos200
0 / 0 / 0
Регистрация: 03.01.2013
Сообщений: 59
1

Вычисление функции трех переменных по заданной формуле

11.01.2013, 01:37. Просмотров 309. Ответов 1
Метки нет (Все метки)

написать программу вычтающая по это й формуле f(x,y,z)=(x+1)/y/z+sin(z)/y/x+1n(y)/x/z.
Вот то что я смог сделать помогите продвинутся дальше..(((

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
procedure TForm3.Button1Click(Sender: TObject);
var x,y,z,n,F:integer;
func:real;
begin
 
 
func:=(x+1)/y/z+sin(z)/y/x+1*n(y)/(x/z);
 
x:=Edit1.Text;
 y:=Edit3.Text;
 z:=Edit4.Text;
 Edit2.Text.inttostr(
end;
 
end.
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
11.01.2013, 01:37
Ответы с готовыми решениями:

Вычисление по заданной формуле
кто может написать прогу для решения примера такого плана \sqrt{x\sqrt{ln x}}+\frac{y}{cos x}

Вычисление суммы по заданной формуле
Нужно написать программу со структурой repeat/until для решения такой задачи: ...

Вычисление значения функции, заданной графически
Написать программу, которая вычисляет значения функции, заданной графически используя, оператор...

Вычисление значения функции, заданной графически
Написать программу, которая по введенному значению аргумента вычисляет значение функции, заданной в...

Вычисление заданной функции в каждой точке отрезка
С помощью циклов,а затем найти сумму полученных значений Написал вот такой код program...

1
volvo
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
26485 / 17786 / 7037
Регистрация: 22.10.2011
Сообщений: 31,306
Записей в блоге: 6
11.01.2013, 02:25 2
В формуле, скорее всего, ошибка. Не 1n, а натуральный логарифм, он же ln...
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
procedure TForm3.Button1Click(Sender: TObject);
var 
   x,y,z,n,F:integer; // Описание F можно убрать
   func: Double;
begin
   x:=StrToInt(Edit1.Text);
   y:=StrToInt(Edit3.Text);
   z:=StrToInt(Edit4.Text);
 
   func:=(x+1)/y/z + sin(z)/y/x + ln(y)/x/z;
   Edit2.Text := FloatToStr(func);
end;
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
11.01.2013, 02:25

Вычисление по формуле
Здравствуйте! Мне необходимо, чтобы программа вычисляла значение по формуле a^b mod c. Написал...

Вычисление значений по формуле
f:=ln(a+sqr(x)) + ((sin*sin)*(x/b)); z:=exp(-c*x)*(x+exp(ln(x+a)/2))/(x-exp(ln(abs(x-b))/2); вот...

Вычисление интеграла по формуле трапеций
Ребята помогите,хочу создать программу в Delphi 7 вычисления интеграла по формуле...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru