Написать программу поскаля, нахождение площади квадрата, значение сторон вводить с...

Question

Написать программу поскаля, нахождение площади квадрата, значение сторон вводить с клавиатуры Помогите

Answer 1

Var
a, b, s: integer;
begin
readln(a);
readln(b);
s := a*b;
println(s);
end.

Comments

var
a, b, s: integer;
begin
readln(a);
s := a*a;
println(s);
end.

---

квадрат!!!!