Ответы
Ответ дал:
0
Var x,y:real;
Begin
Write('x = ');ReadLn(x);
if x < 2 then y:=Sqrt(4*x*x+1)
else y:=Exp(x)-1;
WriteLn('y = ',y);
End.
Begin
Write('x = ');ReadLn(x);
if x < 2 then y:=Sqrt(4*x*x+1)
else y:=Exp(x)-1;
WriteLn('y = ',y);
End.
Вас заинтересует
1 год назад
1 год назад
5 лет назад
8 лет назад
9 лет назад
9 лет назад