FreePascal.ru

Помогите с задачей:
Положительное целое число хорошее, если сумма его цифр больше, чем их произведение. Например, числа 12, 11, 131, 9909 - хорошие, а 39, 546, 22 - нет. Необходимо вычислить количество хороших N-значных чисел (N<=18), у которых первая цифра не является нулём.
Ограничение по времени ...

Извините, нашел ошибки в программе (во входном файле числа шли в строчку, поэтому надо было ставить read, а я ставил readln, из-за чего не получал ответа)! В выходной файл все, что нужно, выводиться!!! Но всё равно спасибо!

Паскаль изучаю уже несколько лет, но с входными и выходными файлами встречался только один раз, притом на олимпиаде! Сейчас пытаюсь писать программы с выходными файлами, но почему-то в выходные файлы у меня ничего не выводиться!!!
Помогите, кто как может!

Спасибо, всё сделал!

viewtopic.php?f=1&t=3700 - ссылка, где написано, что делать.
Сделал так, как там написано, после чего стала появляться ошибка:
Can't find unit system used by akp, где akp - имя в заголовке программы (например, program akp)!!! Кто подскажет, что делать?