Информатика

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


<< Предыдущий вопрос Следующий вопрос >>

Паскаль


 


var a,i:integer;


begin


readln(a);


writeln;


for i:=1 to a do


if (a mod i=0) then writeln (i);


end.

Загрузить файл
Сомневаешься в ответе?

Если сомневаешься в правильности ответа или его просто нет, то попробуй воспользоваться поиском на сайте и найти похожие вопросы по предмету Информатика либо задай свой вопрос и получи ответ в течении нескольких минут.


Смотреть другие ответы