Пожалуйста помогите))Информатика Написать программу нахождения периметра правильного треугольника, сторона которого равна a.
Program z1; var a:integer; begin write('Введите сторону A:'); read(a); writeln('Периметр равен:',a*3); end.