Ответы
Ответ дал:
0
Var
x:integer;
y:real;
Begin
Readln(x);
y:=(sqr(x)*x)+(2.5*sqr(x))-x+1;
Writeln(y);
End.
x:integer;
y:real;
Begin
Readln(x);
y:=(sqr(x)*x)+(2.5*sqr(x))-x+1;
Writeln(y);
End.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад
10 лет назад