Написать программу которая запрашивает сторону квадрата у пользователя и выводит периметр и площадь.

Var a,b,c:integer;
begin
readln(a);
b:=а*a;
С:=4*а;
Writeln(‘периметр’с);
Writeln(‘площадь’b);
end.