sharaeva-is
?>

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

Информатика

Ответы

vasinam

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.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Составить программу вычисления функции на языке PASCAL
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

mbudilina
Nasteona1994
es196
makitra08
peshnoshamon
zagadka27
zakup-r51
pavlino-mkr
tenvalerij
abuzik
baton197310
ananyananar
vikka30
Алёна Геннадьевна98
Евгений