Составьте программу, выводящую ** экран все делители числа х. Число x введите с...

Question

Составьте программу, выводящую на экран все делители числа х. Число x введите с клавиатуры. Пример ввода: 12
Пример вывода: 1 2 3 4 6 12
Помогите пожалуйста!!!!!!!

Answer 1

Var n,i:integer;
begin
readln(n);
for i:=1 to n do
if n mod i = 0 then write(i,' ');
readln;
end.

Comments

спасибо !!!!!

---

:D