Как будет выглядеть эта формула в Делфи?

@vover · Регистрация: 21.09.2016

Author24 — интернет-сервис помощи студентам

.............1
...........------- - cosx
..F=......cos^2x
...........--------------------
............3sin^2x ln cos x
На точки не обращайте внимания

DenNik · 16.05.2017, 20:51

внизу есть редактор формул, практически как в ворде. слабо разобраться?
так, что ли?

$https://www.cyberforum.ru/cgi-bin/latex.cgi?\huge F=\frac{\frac{1}{{\cos}^{2}x}-\cos x} {{3\sin}^{2}x\ast\ln\cos x}$

@D1973 · 17.05.2017, 11:17

Сообщение от vover

Как будет выглядеть

Вот так

Delphi

1
2
3

uses math;
...
f := (1 / Power(cos(x), 2) - cos(x)) / 3 * Power(sin(x), 2) * ln(cos(x));

@Puporev · 17.05.2017, 12:34

Нужно добавить

Delphi

if (cos(x)<=0)or(sin(x)=0) then
 begin
  showmessage('F не определено');
  exit;
 end;

@ksvsvk · 17.05.2017, 13:24

С проверкой значения sin(x) понятно, а вот чем отрицательный косинус не угодил?

@BOGG ART · 17.05.2017, 13:55

Наоборот, понятно с cos(x), а вот что не так с sin(x)?

Добавлено через 9 минут
а... Math.Power() оказывается не принимает ноль, забавно...

https://ru.wikipedia.org/wiki/... 1%84%D0%BC

@Puporev · 17.05.2017, 14:04

Сообщение от BOGG ART

а вот что не так с sin(x)?

Да деление на sin.

@Matan! · 17.05.2017, 15:31

Я бы посоветовал знаменатель взять в скобки:

Delphi

1	f := (1 / Power(cos(x), 2) - cos(x)) / (3 * Power(sin(x), 2) * ln(cos(x)));

@vover 0 / 0 / 0 Регистрация: 21.09.2016 Сообщений: 4
		1
	Как будет выглядеть эта формула в Делфи? 16.05.2017, 19:46. Показов 1095. Ответов 7 Метки нет (Все метки) .............1 ...........------- - cosx ..F=......cos^2x ...........-------------------- ............3sin^2x ln cos x На точки не обращайте внимания 0

DenNik Житель Земли 3002 / 3004 / 391 Регистрация: 26.07.2011 Сообщений: 11,463 Записей в блоге: 1
	16.05.2017, 20:51	2
	внизу есть редактор формул, практически как в ворде. слабо разобраться? так, что ли? $https://www.cyberforum.ru/cgi-bin/latex.cgi?\huge F=\frac{\frac{1}{{\cos}^{2}x}-\cos x} {{3\sin}^{2}x\ast\ln\cos x}$ 0

@ksvsvk 1 / 1 / 0 Регистрация: 15.06.2014 Сообщений: 95
	17.05.2017, 13:24	5
	С проверкой значения sin(x) понятно, а вот чем отрицательный косинус не угодил? 0

@BOGG ART 592 / 459 / 147 Регистрация: 09.12.2013 Сообщений: 2,385 Записей в блоге: 2
	17.05.2017, 13:55	6
	Наоборот, понятно с cos(x), а вот что не так с sin(x)? Добавлено через 9 минут а... Math.Power() оказывается не принимает ноль, забавно... https://ru.wikipedia.org/wiki/... 1%84%D0%BC 0

@Puporev Почетный модератор 64299 / 47594 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	17.05.2017, 14:04	7
	Сообщение от BOGG ART а вот что не так с sin(x)? Да деление на sin. 0

	17.05.2017, 15:31

Опции темы