Дана сторона квадрата а Найти его площадь S=a^2

Question

Дана сторона квадрата а Найти его площадь S=a^2

---

Comments

Ну у тебя все дано. В чем проблема

---

Аа не грузилось фотка

Answer 1

Var a,s: integer;
begin
Read (a)
s:=a*a
Writeln(s)
end.

Comments

или это: Var a: integer; begin Read(a) Writeln(a*a) end.