Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
паскаль
var a,i: integer;
begin
readln(a);
writeln;
for i: =1 to a do
if (a mod i=0) then writeln (i);
end.
1. начало
2. оденься
3. выйти из дома
4. если есть машина
5.то сесть в машину
6. завести машину
7.начать путь следования по дороге
8.доехать до села
9. выйти из машины
иначе 10. дойти до остановки
11.дождаться автобуса
12. зайти в автобус
13. доехать до села
14. выйти из автобуса
15. конец
Популярные вопросы