# «отрезка прямой»,

«отрезка прямой», от следующего отличается изменением значений приращений индексов. Внесем номер приращения в параметр рекурсии и получаем короткую и изящную программу. Разумеется, этими вариантами не исчерпывается все множество возможных решений задачи. r89_4 Идея решения. Номера спортсменов записываются первоначально в массив А, номера удаляемых спортсменов - в массив В. Процесс продолжается до тех пор, пока в А есть элементы. Другое решение основано на использовании множественного типа данных - задачу можно считать учебной при его изучении. Фрагмент реализации. var A:set of byte; i:integer; begin ... A:=[1..N]; {в кругу все спортсмены} i:=&lt;номер спортсмена, с которого начинается счет&gt;; repeat {считаем, до тех пор, пока в кругу есть спортсмены} for j:=1 to k do{пропускаем k спортсменов} repeat i:=i mod n+1; until i in A;{находим очередного спортсмена} &lt;номер i записываем в массив или выводим на экран&gt;; A:=A-[i];{исключаем номер i из множества

Индекс
Элементарные функции Линейные уравнения Нелинейные уравнения Случайные числа