Cod sursa(job #585948)

Utilizator ion_calimanUAIC Ion Caliman ion_caliman Data 30 aprilie 2011 12:50:06
Problema NumMst Scor 20
Compilator fpc Status done
Runda Algoritmiada 2011, Runda Finală, Clasele 10-12 Marime 0.25 kb
var     n,i,j:longint;
        f,g:text;

begin
  assign(f,'nummst.in');
  assign(g,'nummst.out');
  reset(f);
  rewrite(g);
  readln(f,n);
  i:=2;
  while n mod i <>0 do inc(i);
  for j:=1 to i do
    write(g,n div i,' ');
  close(g);
end.