Напишите код програмы который будет вычислять периметр фигуры

Периметр треугольника вычисляется по формуле P = a + b + c

где a, b, c - длины сторон треугольника

}

Program Perimetr;

var   P, a,b,c:integer;

Begin

  writeln('Введите длины сторон треугольника ');

  write('a='); readln(a);

  write('b='); readln(b);

  write('c='); readln(c);

  P:= a+b+c;

  writeln('Периметр треугольника = ', P);

end.