Решите пожалуйста сложность 8 класса срочно
Решите пожалуйста сложность 8 класса срочно
Гость
Ответ(ы) на вопрос:
ГостьVar X,Y:real;
Begin
1Write('X = ');ReadLn(X);
if X<0 then Y:=Sqr(Sin(X))+2*X
else Y:=sqrt(X)+Sqrt(X*X+1);
Write('Y = ',Y)
End.
Не нашли ответ?
Похожие вопросы