Напишите программу в паскаль: составить программу для получения в порядке убывания всех делителей данного числа
Напишите программу в паскаль: составить программу для получения в порядке убывания всех делителей данного числа
Гость
Ответ(ы) на вопрос:
Гостьprogram Divisors; var N,i: integer; begin readln(N); for i:=N downto 1 do if N mod i = 0 then write(i,' '); end.
Не нашли ответ?
Похожие вопросы