математические формулы в Pascal - Помощь студентам

sasha55 · 07.04.2013, 10:56

Здравствуйте,уважаемы программисты. Помогите пожалуйста написать эти математические формулы в Pascal.
fTlEDVfk0Dw_cr.jpg
fTlEтлDVfk0Dw_cr.jpg

Пожалуйста ,помогите!

Аватар · 07.04.2013, 11:04

Код:

  if x<0 then y:=1/sqr(x)
         else y:=sqr(x);

  if x<-Pi     then y:=-1
  else if x>Pi then y:=1
               else y:=Cos(x);

sasha55 · 07.04.2013, 12:29

спасибо огромное!))

07.04.2013, 10:56	#1
sasha55 Пользователь Регистрация: 14.05.2011 Сообщений: 23	математические формулы в Pascal Здравствуйте,уважаемы программисты. Помогите пожалуйста написать эти математические формулы в Pascal. fTlEDVfk0Dw_cr.jpg fTlEтлDVfk0Dw_cr.jpg Пожалуйста ,помогите! Последний раз редактировалось sasha55; 07.04.2013 в 12:32.

07.04.2013, 11:04	#2
Аватар Старожил Регистрация: 17.11.2010 Сообщений: 18,922	Код: `if x<0 then y:=1/sqr(x) else y:=sqr(x); if x<-Pi then y:=-1 else if x>Pi then y:=1 else y:=Cos(x);` Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Математические формулы в Delphi	Botanik1987	Помощь студентам	10	25.02.2017 19:09
Математические формулы	Serjuk	Помощь студентам	0	04.12.2011 17:42
Математические действия в Pascal	A_Orlov	Паскаль, Turbo Pascal, PascalABC.NET	0	27.04.2010 16:47
Математические операции Pascal	Gonzo	Помощь студентам	5	19.03.2009 13:49
Математические формулы в PHP	kutt	PHP	2	01.09.2008 23:33

07.04.2013, 12:29	#3
sasha55 Пользователь Регистрация: 14.05.2011 Сообщений: 23	спасибо огромное!))