Перед началом цикла
переменную К надо инициализировать. Сейчас в ней мусор.
А после implementation разве можно писать операторы? Операторы должны быть внутри функций / процерур.
Т.е. ты неправильно перешёл от Паскаля к Delphi. Если приложение консольное, то оно похоже на Паскаль. Если обычное, оконное, то начало программы в файле .dpr, который обычно никто не трогает, а все пишут в unit'ах, в которых, как я написал, только описания и подпрограммы (то бишь все операторы внутри подпрограмм).