Написать программу y=x^2

Question

Написать программу y=x^2

Comments

pls

---

Паскаль?

---

да

Answer 1

Var
X:real;
Begin
Write('X = ');
ReadLn(X);
WriteLn('Y = ',X*X);
End.