//pascal

var a : integer;

begin

readln(a);

writeln('Площадь квадрата - ', a*a,' см2');

writeln('Периметр квадрата - ', a*4, ' см');

end.

Ответ:

периметр=5+5+5+5

Объяснение:

площадь 5*5