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

var a: integer; s: real; begin   readln(a);   s:=(sqr(a)*sqrt(3))/4;   writeln(s); end.

Площадь равностороннего треугольника через его сторону определяется по известной формуле: [latex]\displaystyle S= \frac{\sqrt{3}}{4}a^2 [/latex] // PascalABC.NET 3.0, сборка 1128 var   a:real; begin   Write('Введите длину стороны треугольника: '); Read(a);   Writeln('Площадь треугольника равна ',sqrt(3)/4*sqr(a):0:3) end. Тестовое решение: Введите длину стороны треугольника: 3.18 Площадь треугольника равна 4.379