begin
  writeln('Hello World!')
end.

{ e-moe: Никогда не пишите таких исходников, пожалейте своих коллег! :-) }
function Int1(f: TFunc; a,b: extended; n: byte): extended;
{ Численное интегрирование - Правило трапеций
 
I ~= h( y[0] + 2y[1] + ... + 2y[n-1] + y[n] )/2.		(4)
 
 Параметры функции:
  f - ссылка на подинтегральную функцию
  a,b - координаты начальной и конечной точнек интегрирования
  n - точность
}
var
  res: double;   { временная переменная, будет хранить результат }
  {если extended, то надо обнулить отдельно, а не в цикле :( TP7.1}
  i: byte;       { счетцик цикла }
begin
  { на 0 делить нельзя! }
  inc(n,byte(n=0));
  for i:=0 to n do
    res:=res*byte(i<>0)+(byte((i>0)and(i<n))+1)*f(a+i*(b-a)/n)*(b-a)/n*0.5;
  Int1:=res;
end;

Цвета для Паскаля и Дельфи настроил. Уже, вроде, лучше выглядит.

e-moe: Салатные скобочки почти не видно (

Согласен. Какого цвета лучше задать? Знаю, что тёмного. Коричневый подойдёт? (админ)

e-moe: не, ну kто тут админ? :) тебе ж проще поменять и посмотреть что и как будет смотреться…

Krott: скобочки коричневые однозначно лучше будут

Хорошо. Когда появится свободное время, выставлю коричневый цвет. (админ)

Заменён цвет скобок по просьбе. (Romtek)

Salo: А как делается сбоку содержание

Скачай и посмотри исходники DokuWiki (Stam)

Romtek: есть такой плагин (шаблон), называется Sidebar.

Интересненько…

Все довольны. Вот и чудненько.