Составить программу вычисления функции на языке PASCAL


Составить программу вычисления функции на языке PASCAL

ЕлИзАвЕтКа0915 ЕлИзАвЕтКа0915    3   13.01.2021 13:06    3

Ответы
sabrina23052006 sabrina23052006  13.01.2021 13:10

var y,x:real;

begin

 writeln('введите x');

 readln(x);

 if (x>0) and (x<=1) then y:=sqrt(x+2) else  if (x>1)then Y:=ln(x-1) else y:=17.9+x;

 writeln(y)

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика