Напишите код программы, которая будет вычислять периметр фигуры. program perimeter; var begin writeln readln end. скажите , контрольная по информатике заранее

Var a,b,c: real; begin writeln('введите стороны треугольника'); readln(a,b,c); writeln('p =',a + b +c); end. пример: введите стороны треугольника 1 2 3 p =6