«Sigmund, а нах тебе i нужен в этом коде?»
Смотри. Изначально i и n равны 0. Далее цикл с постусловием. В нём i будет 1, 2, 3, 4... и т. д. Соответственно, n будет 0+1, 1+2, 3+3, 6+4... и т. д., пока n не станет равной 666 и не завершит цикл. Этот код просто пример – импровизация, если угодно, поэтому и особых изысков в нём не найти.
«Ты забыл дать начальное значение Label1.Caption»
Начальное значение присваивается средой. Но, в данном случае ему вообще не требуется. Компонент используется лишь для вывода текста на форму.
«А на каком это языке? Похоже на Паскаль»
Delphi или, если больше нравится, то Object Pascal.
«есть некоторые вещи, которые я не понимаю (например, {$R *.dfm})»
Это включение описания формы в DFM-файл (Delphi Form File). Он требуется при компиляции. Просто тонкости IDE.

«Ничего себе, простенький...»
На самом деле программа не сложнее классической «Hello, world!».
«Was ist das?»
Первое – это концепция потокового ввода/вывода. В классическом C ввод/вывод организован с использованием методов, размещённых в заголовочных файлах io.h и stdio.h, где связь с файлами осуществляется через дескрипторы и файловую переменную. В этой программе я использую файл включения iostream и директиву using namespace std; поскольку классы определены в стандартной области имён. Включение этого файла делает доступным четыре предопределённых потоковых объекта.
cout (console output) – экземпляр потокового класса ostream. Используется для вывода на экран, можно применять агрегатно и выводить сразу несколько значений, при этом тип выводимого значения оператор определяет сам.
cin (console input) – это, соответственно, уже экземпляр потокового класса istream. Используется для ввода с клавиатуры, его так же можно применять агрегатно.
Остальные два объекта более специфичны:
cerr – используется для вывода сообщений об ошибках;
clog – используется для ведения журнала.
Теперь о методах.
>> - оператор для чтения из входного потока istream. Это форматированное извлечение данных для всех основных типов.
<< - а это форматированный вывод данных для всех основных типов.
endl (end of line) – это просто переход в начало следующей строки.
Вообще, тема потоков довольно обширна. Их преимущество – удобство. Для сравнения, например, можно использовать conio.h (console input/output).
cputs(“...”); //console put string – вывод строки на экран.
cprintf(“%...”,...); //console print format – форматированный вывод. “%...” – задаёт формат вывода. Непосредственно после символа % следует спецификатор формата, к примеру, d – decimal (десятичные) или f – float (с плавающей).
cscanf(“%...”,&...); //console scan format – форматированный ввод. Так же указывается спецификатор формата, а амперсанд – это уже особенности синтаксиса языка.
По второму пункту всё обстоит гораздо сложнее. Чтобы изложить суть потребуется углубляться в GENTEXT.C и TCHAR.H. Это нюансы main, tmain, wmain. Скажем просто, данная часть кода была сгенерированна при создании проекта. В принципе, если смущает, то её можно убрать  и преобразить к виду:

#...
main()
{
     ...
}

«Спасибо за объяснение»
Да не за что) Если интересны детали, то на http://rsdn.ru/ всегда можно найти подборку статей по теме. Удачи в кодинге)

А теперь на VisualBasic пожалуйста

VB:

Module Module1

    Sub Main()
        Dim i, n As Integer
        i = 0
        n = 0
        While n <> 666
            i = i + 1
            n = n + i
            Console.Write(n)
            Console.WriteLine("|")
        End While
        Console.ReadLine()

    End Sub

End Module

Прикинте, а ведь я, года 3 назад была еврейкой по вере. В торе действительно есть много интересных вещей, и, я осмелюсь заявить,  кое что  в этой религии понимаю. Во всяком случая я уважаю ее.
И все же, я разочаровалась в богах. Если что и есть (что вполне может быть) то ЭТОМУ нет дела до каждой отдельно взятой Тани, а значит и отдельно взятой Тани должно быть по барабану, как там живется (или существуется) господину богу.

Я не принадлежу ни к какой религии, поскольку в каждой есть доля мудрости и доля идиотизма. Но и атеистом себя назвать не могу, поскольку всё-таки верю, допустим, в другие миры и тому подобное. Вот как всё запущено)))