PASCALНа вход с клавиатуры получаем число, не превосходящее 10^9. Вывести все

trunc обнуляет все после запятой

Ну да, и что? Целое же количество итераций должно быть

Не тесни интеллектом, растолкуй

xD

Ну ты разумеешь, как проверить, обычное ли число?

В математике - знаю, про решето Эратосфена знаю, как это перенести в паскаль - нет, как еще и сделать это отлично - тем более.

В Pascal ABC.net, в образцах есть программа "Решето Эратосфена". Понятия не имею, что это=D

Если ты до того, как найти, простое ли большое число, своими мощами дошел, это, конечно, превосходно, но что ты тогда на этом веб-сайте забыл? Тут вроде как подсобляют осознать как делать, а "решения в разуме" полезны только тому, кто их умеет совершать.

Repeati:=i+2; - добавляем двойку, чтобы исключить нечётные числа, т.к. все 2 мы исключили в прошлом цикле While A mod i = 0 do Если A не делится на i нацело, то цикл repeat ещё раз прибавит к i двойку Begin S:=S+'*'+IntToStr(i); Если A делится нацело на i, то i будет выведено на экран A:=A div i Переменная A разделится на i, и цикл While снова проверит, делится ли A на то же самое i, ещё, если же нет, i снова возрастет EndUntil i>N;

Спасибо.