var
a:integer;
begin
a:=4;
a:=a*a;
writeln('Площадь = ', a);
end.
var 4:integer;
readln(4);
writeln(4*4);
var
a:integer;
begin
a:=4;
a:=a*a;
writeln('Площадь = ', a);
end.
var 4:integer;
begin
readln(4);
writeln(4*4);
end.