Дали задачу .. можна без файлов делать

[Siusarna]

Киньте код плиз буду оч благодарный
3. Лунатик
У президента Первого национального банка майора Томаса Б. Кiнгмена (героя рассказа ОьГенрi «Товарищи из Сан-Розарiо») появилась вредная привычка каждую ночь переводить одинаковым образом содержание сейфов, в которых клиенты хранят свои драгоценности.
Задача
Создайте программу sleep. *, Которая поможет вычислить, через сколько суток все драгоценности впервые вернутся на свои места.
Входные данные
Первая строка файла sleep.dat содержит одно натуральное число n - количество сейфов банка, превышает 15500. Далее (, начиная со второй строки) файл содержит последовательность n различных натуральных чисел в пределах от 1 до n включительно. k-й член этой последовательности - номер сейфа, куда майор переводит содержание k-го сейфа первой ночи.
Исходные данные
Единственная строка файла sleep.res должен содержать запись в десятичные системе счисления искомого числа суток, содержащий не более 1000 цифр.
Пример
sleep.dat sleep.res
5
2 3 1 5 4 6