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

var a,s,p:integer;

begin

a:=3;

p:=a*4;

s:=a*a;

writeln(p,' ',s);

end.