Предмет: Информатика, автор: kimosabe

Натуральное число, на которое заданное числоделится без остатка:

Ответы

Автор ответа: archery
0

var i,n :integer;

Begin

  read(n);

  for i:= 1 to n do

    if n mod i = 0 then

      writeln(i);

End.

Интересные вопросы
Предмет: Математика, автор: Аноним