Вещественной число NAN (Pascal)

[leiprechain]

Сообщение от GreenWizard

если выскакивает не постоянно => проблема в рандоме => f может быть любым => может выходить за пределы допустимых значение => проверяем его, смотрим на наличие ошибки

попробуйте в код вставить:

f := random;
writeln('random = ', f);
f := 2 * f * 3.14;

и смотрите, что там за числа

1.Выскакивает только после определённого количества запуска.
Например при v=1 и n=900 нули появляются при четвёртом запуске. Ну а за ними и NAN
2. В рандоме всё норм и никаких сбоев
Результат во вложении.