Proc4. Описать процедуру TrianglePS($$a$$, $$P$$, $$S$$), вычисляющую по стороне a равностороннего треугольника его периметр $$P = 3*a$$ и площадь $$S = a^2*\sqrt{3}/4$$ ($$a$$ — входной, $$P$$ и $$S$$ — выходные параметры; все параметры являются вещественными). С помощью этой процедуры найти периметры и площади трех равносторонних треугольников с данными сторонами.

Решение от Дмитрия:

Другие задачи из раздела Proc можно посмотреть здесь.