В ЧЕМ ОШИБКА?

program asda;
var a,b: integer;
begin
writeln('вычисление периметра и площади прямоугольника);
write('введите a>>,b>>')
readln(a,b);
P:=2(a*b);
S:=a*b;
writeln('P:=',P:6:4);
writeln('S:=',S:6:4);
end.