Question

Задача 35. Решить Паскалем.
Дана сторона равностороннего треугольника. Найти площадь этого треугольника, его высоты, радиусы вписанной и выписанной окружностей.

Answer 1

const s3 = sqrt(3);
var a: real;
begin
  write('сторона: ');
  readln(a);
  writeln('площадь: ', a*a*s3/4);
  writeln('высота: ', a*s3/2);
  writeln('радиус описанной окр.: ', a*s3/3);
  writeln('радиус вписанной окр.: ', a*s3/6);
end.

Answer 2

Сделай не через операторов вывода.