Напишите программу, которая вычисляет площадь и периметр квадрата со стороной равной 3 см . Пж в Паскаль
var a,s,p:integer;
begin
a:=3;
p:=a*4;
s:=a*a;
writeln(p,' ',s);
end.