Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
ответ:
1-1 2 - 7 3-1 4-4 6-6 7-8 8-3.
объяснение:
как то так)
1.
program xxx;
var i, n : integer
begin
writeln ('введите число n=');
readln (n);
writeln ('делители числа: ');
for i: = 1 to n do
if n mod i = 0 then writeln (i);
readln
end.
Популярные вопросы