Запись формулы в Delphi - Помощь студентам

moralore · 30.11.2018, 16:08

подскажите как записать данную формулу в Delphi

Вадим Мошев · 30.11.2018, 16:17

Код:

y:=( exp(ln(x*x-4)/3) ) / 3 / exp(2)

moralore · 30.11.2018, 16:54

А тут как

p51x · 30.11.2018, 16:55

Через if

newerow1989 · 09.12.2018, 07:39

Код:

if x<-1 then
   y:=x*x+Abs(x) else
if x>=1 then
   y:=Sqrt(x+9) else
   y:=x*x*x+Cos(x);

30.11.2018, 16:17	#2
Вадим Мошев Старожил Регистрация: 12.11.2010 Сообщений: 8,568	Код: `y:=( exp(ln(x*x-4)/3) ) / 3 / exp(2)`

09.12.2018, 07:39	#5
newerow1989 Я самый любопытный Участник клуба Регистрация: 24.07.2012 Сообщений: 1,949	Код: `if x<-1 then y:=xx+Abs(x) else if x>=1 then y:=Sqrt(x+9) else y:=xx*x+Cos(x);` С запрограммированным приветом, Неверов Евгений! Сайт: http://newerow1989.ru [Паскаль] [Delphi]

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Запись длинной формулы	TotoSmile	Microsoft Office Access	9	05.07.2017 16:30
Вычисления в Delphi (запись математической формулы с дробями и степенями)	Kykyx	Общие вопросы Delphi	4	21.09.2014 18:24
Запись формулы в Delphi	djdron	Помощь студентам	4	14.03.2014 17:04
Запись формулы в функцию	Roller17	Общие вопросы Delphi	1	19.06.2011 13:12
Запись формулы	Alex0161	Помощь студентам	2	29.12.2010 20:25

30.11.2018, 16:55	#4
p51x Старожил Регистрация: 15.02.2010 Сообщений: 15,707	Через if