дана сторона квадрата a.Составьте программу которая вычисляет его периметр P и площадь S и выводит результаты на экран​

//PascalABC.NET

//Версия 3.3, сборка 1611

begin

var a:=ReadReal('Введите сторону квадрата:');

write('S=',a*a,'; P=',a*4);

end.

a = float(input("Чему равна сторона квадрата? "))

print("P =",a*4,"| S =",a**2)