Найти периметр равносторонего треугольника если длина его сторон величина переменной и вводиться с клавиатуры. Помогите пожалуйста
Var a,p:integer; begin; readln(a); p:=3*a; writeln(p); end.