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