Turbo pascalban kellene nekem 1-100-ig kiírni a páratlan számokat ciklusba?

Indítasz egy ciklust 1-100-ig. MOD függvénnyel megnézed, hogy 2-vel osztható -e? Ha a maradék nem 0 kiírod.

Pontos kódot ne várj tőlem, 15 éve nem pascal-oztam kb.

Itt van C++-ban, de csak a ciklus:

for(int i=1; i<100; i++){

if(i%2==1){

std::cout<<i<<std::endl;

}

}

wtf?!? Mi a francnak a vizsgálat???

C++-ban:

for(int i=0;i<100;i+=2)

printf("%d\n",i);