cislo=0
delitelia=0
zadaj nenulove cislo
ak cislo==0 exit
for i=1;i<=cislo;i++
{
ak nie je zbytok po deleni cislo/i tak delitelia++
}
pocet delitelov delitelia
exit
cislo=0
delitelia=0
zadaj nenulove cislo
ak cislo==0 exit
for i=1;i<=cislo;i++
{
ak nie je zbytok po deleni cislo/i tak delitelia++
}
pocet delitelov delitelia
exit