M меньше n, n и m натуральные числа. Вывести на экран числа от m до n которые не являются простыми

Question

Информатика

Ануска

3 января, 17:55

M меньше n, n и m натуральные числа. Вывести на экран числа от m до n которые не являются простыми

+4

Ответы (1)

Знаете ответ?

Суникай · Answer 1

begin

var m : = 1;

var n : = 10;

foreach var i in range (m, n) do

begin

var d : = 2;

while (d < i) and (i mod d 0) do d + = 1;

if d < i then Print (i)

end

end.