uses crt; var i,n,m:integer; begin read(n); m:=n; i:=1; while i<=m do begin if n mod i=0 then begin write(i,' '); m:=(n div i); end; i:=i+1; end; write(n); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
