Составить блок схему алгоритма и программу вычисления площади равностороннего треугольника.
Var a,s: real;
begin
write(длина стороны: );
readln(a);
s:=a*a*sin(pi/3)/2;
writeln(площадь треугольника = ,s:6:4);
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Var a,s: real;
begin
write(длина стороны: );
readln(a);
s:=a*a*sin(pi/3)/2;
writeln(площадь треугольника = ,s:6:4);
end.