3. Дана сторона квадрата a. Найдите его периметр P=4∗a и площадь S=a2.
программа Паскаль

uses GraphABC;var  s, p, a: integer;begin  read(a); //спрашиваем сторону квадрата  p := 4 * a;  s := sqr(a);  print('Периметр квадрата: ' + p + '. Площадь квадрата: ' + s + '.');end.

program lol;var a;b;c:integer;beginread(A);b:=4*a;c:=a*a;writeln('Периметр=',b);writeln('Площадь='C);end.