{ Периметр треугольника вычисляется по формуле 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);