Даны 3 стороны треугольника вычислите его периметр составить алгоритм и программу

var a, b, c, P: real;

begin

 writeln('Введите сторону a: ');

 readln(a);

  writeln('Введите сторону b: ');

 readln(b);

 writeln('Введите сторону c: ');

 readln(c);

 P:= a + b + c;

 writeln('Периметр = ',P);  

end.

алгоритм по коду напишешь