Напишите код программы, которая будет вычислять периметр фигуры.ТОЛЬКО ЧТОБЫ ПОНЯТНО

Var a, b, c, p (это стороны и периметр)BeginWriteln ("vvedite storony figury a, b, c");Readln (a, b, c);p:=a+b+c;Writeln ("p=");Readln (p);End.