Задача4 Семь раз отрежь: Вводится слово затем число – шаг отреза. Сначала отрубить "кусок", равный шагу, с конца слова, затем такой же "кусок" с начала, затем снова с конца и так далее, пока не станет не больше шага. Вывести полученные "куски" поочередно на отдельных строках. Оставшийся кусок вывести в последней строке.
Пример:
Ввод:
Тетрагидропиранил
3
Вывод:
нил
Тет
ира
раг
роп
ид

word = input()

step = int(input())

state = True

while len(word) > step:

...     if state:

...             print(word[-step:])

...             word = word[:-step]

...     else:

...             print(word[:step])

...             word = word[step:]

...     state = not state

print(word)

word = str(input("Введите слово: "))

step = int(input("Введите шаг: "))

for i in range(1, int((len(word)) // step)):

   if len(word) >= step * 2:

       print(word[-step:])

       print(word[:step])

       word = word[step:-step]

   if len(word) >= step:

       print(word[-step:])

       word = word[:-step]

   else:

       print(word)

       break

у меня вроде с примером сработало

революция 1917 года и великая отечественная война (1941-1945)

var a: integer; beginreadln(a); write (a div 10); end.