Посчитать определенный интерграл

[Lizonka-88]

Помогите, пожалуйста, даже не думала, что Паскаль такой сложный...
посчитать определенный интеграл методом трапеций:
интерграл от 2,01 до 3,918 от (dx/(x^2*lnx)).

[Stilet]

Если не ошибаюсь это обычный цикл

while x<=3,918 do begin
 s:=s+exp(2*lg(x)*ln(x));
 x:=x+шаг;
end;