составить программу в паскале. составить программу, определяющую длину равностороннего треугольника

Что такое "длина равностороннего треугольника"?
Впрочем, пожалуйста:
var l:integer;
begin
write('Введите длину равностороннего треугольника: ');
readln(l);
writeln('Длина равностороннего треугольника равна ',l)
end.