Технический форум - Задача о принадлежности точки графику функции

Технический форум (http://www.tehnari.ru/index.php)

- Delphi, Kylix and Pascal (http://www.tehnari.ru/forumdisplay.php?f=43)

- - Задача о принадлежности точки графику функции (http://www.tehnari.ru/showthread.php?t=57989)

димон4ик

02.10.2011 15:17

Задача о принадлежности точки графику функции

принадлежит ли данная точка графику функции. помогите решить третье задание http://softyourcomp.narod.ru/MPT/lab_oaip_01.pdf

люди помогите плиз http://softyourcomp.narod.ru/MPT/lab_oaip_01.pdf третье задание или меня выгонют

Ау кто нибудь ответте

Gruvi не поможешь???

Vladimir_S

02.10.2011 18:23

Код:

var

 a, b:real;

function f(x:real):real;

 begin

  if (x>=-9.0) and (x<-5.0) then

   f:=2.0-sqrt(4.0-sqr(x+7.0)) else

  if (x>=-5.0) and (x<-4.0) then

   f:=2.0 else

  if (x>=-4.0) and (x<0.0) then

   f:=-0.5*x else

  if (x>=0.0) and (x<Pi) then

   f:=sin(x) else

   f:=x-Pi;

 end;

Begin

 writeln('Enter the point coordinates:');

 write('a= ');

 readln(a);

 write('b= ');

 readln(b);

 if (a>=-9.0) and (a<=5.0) and (f(a)=b) then

  writeln('Yes, belongs')

 else

  writeln('No, does not belong');

 readln;

End.

димон4ик

02.10.2011 20:41

СПАСИБО!!!!

Часовой пояс GMT +4, время: 18:22.