ГНЧЭ-1 (Pascal)

ГНЧЭ-1

«ГНЧЭ-1» — сложное электронное устройство, выдающее числа последовательности 1, 2, 2, 3, 3, 3, 4, 4, 4, 4, 5… Ввиду дороговизны электронных комплектующих вам поручено разработать эмулятор для этого устройства.

Входные данные:
Дано количество чисел (от 1 до 1000000), которое сгенерирует генератор после включения.

Выходные данные:
Результат работы генератора

Исходный код на языке Pascal
var
  a, n, k, i: integer;

begin
  read(n);
  k := 0;
  a := 1;
  while k < n do
  begin
    for i := 1 to a do
    begin
      write(a, ' ');
      k := k + 1;
      if k >= n then 
        break
    end;
    a := a + 1;
  end;
end.