(Паскаль) пожалуйста решите и скиньте пожалуйста свою соц сеть, у меня ещё есть несколько...

0 голосов
20 просмотров

(Паскаль) пожалуйста решите и скиньте пожалуйста свою соц сеть, у меня ещё есть несколько задач! Завтра зачёт а я не очень готов, добрые люди помогите


image

Информатика (22 баллов) | 20 просмотров
Дан 1 ответ
0 голосов

var f,x: real;

begin

write('Введите x: ');

readln(x);

if x

f:=-sqr(x)-1.1*x+9

else

f:=(ln(x+3))/(sqr(x)+9);

writeln(f);

end.

(552 баллов)