Pascal abc. вынести на экран число n k раз.с циклом для и пока.

Считаете цикл от 2 до n/2. На каждом шаге делите, пока остаток равен нулю и выводите на экран. Простые числа так и пойдут.

Александр: Остаток деления на 1 любого числа - нуль, так что ваша программа не сработает :)
Плюс к примеру у числа 8 - простые множители - 2*2*2, а у вас 2*4.

Зло: На самом деле, если брать и делить тоже самое 24 (2*2*2*3) (к примеру) на 2, пока остаток нуль, то дальше на числа кратные 2-м мы уже не поделим (поделили на первой итерации) , то есть 4, 8 и прочие просто пройдут мимо.