Verified answer

Ответ:

var k: integer;

begin

   k := 0;

   while k < 10 do begin

       writeln('привет');

       k += 1;

   end;

end.

Объяснение:

По ошибкам:

Изначально необходимо объявить что переменная k - целое число.

Написать в цикле while begin и end.

Затем в цикле while добавить увеличение переменной k на 1.