Proc4. Описать процедуру TrianglePS(a, P, S), вычисляющую по стороне a равностороннего треугольника его периметр P = 3*a и площадь S = a^2*\sqrt{3}/4 (a — входной, P и S — выходные параметры; все параметры являются вещественными). С помощью этой процедуры найти периметры и площади трех равносторонних треугольников с данными сторонами.
Решение от Дмитрия:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 |
алг proc4 нач вещ a, P,S нц 3 раз вывод "Введите сторону треугольника " ввод a TrianglePS(a, P,S) вывод "Периметр треугольника ",P, нс вывод "Площадь треугольника ",S, нс кц кон алг TrianglePS (арг вещ a, рез вещ P,S) дано a>0 надо нач P:=3*a S:=(a**2)*sqrt(3)/4 утв P>0 и S>0 кон |
Другие задачи из раздела Proc можно посмотреть здесь.
Комментарии: