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

program qq;var a, b, c, P: real;beginwrite( 'Введите значения сторон треугольника: ' );readln(a,b,c);Р := a+b+c;write( 'Периметр треугольника равен: ', P);end.