Дана сторона равностороненого треугольника. Определите площадь и периметр треугольника.

Question

Информатика

Тата

18 июня, 14:41

Дана сторона равностороненого треугольника. Определите площадь и периметр треугольника.

+3

Ответы (1)

Знаете ответ?

Арсюта · Answer 1

Var a:integer; S, p:real; beginWrite ('Введите a сторону треугольника') ; Readln (a) ; P:=3*a; Writeln ('Периметр=', P) ; S: = (sqr (a) * sqrt (3)) / 4; Writeln ('Площадь', S) ; Readln; end.