Pascal - Problemi con i cicli...HELP HELP

Salve a tutti..x domani ho da effettuare questo programma a scuola e vi chiedo una mano xke non ci riesco!
Allora:
Prendere in INPUT 2 numeri A e B positivi e verificare se il più grande fra i due è divisibile per l'altro. Io ho iniziato facendo così:

program P_o_D;
uses CRT;
var a, b ,aux: integer;

BEGIN
clrscr;
writeln('Inserisci il primo numero intero positivo');
readln(a);
writeln('Inserire il secondo numero intero positivo');
readln(b);
if a > b
then
aux := a - b;
else
aux := b - a;
pero arrivato a questo punto non so ke condizione chiedermi x il ciclo affinchè mi dica se quello più grande è divisibile per l'altro....vi prego aiutatemi

Se il resto tra il primo numero e il secondo è 0 allora il primo numero è divisibile per il secondo.

Si lo sapevo....però praticamente dopo l'ultima operazione ke ho postato devo utilizzare un ciclo non una condizione...non so se sono riuscito a spiegarmi bene!!

per sapere se se una divisione ha resto usa la funzione MOD.
Ecco un piccolo esempio:

//...

if (x mod 2) <> 0 then writeln('X è dispari')
else writeln('X è pari');

//...

Perchè un ciclo? A che vantaggio?

NON lo so la professoressa vuole cos'...pensa ke anke io mi sono chiesto il xke..boh!!

un ciclo sevre a nulla nel programma che hai chiesto. Hai due possibilità:
1)Hai capito male;
2)Hai una/o prof. stupido/a;

XD

E lo so..cmq opto parecchio sulla seconda! Cmq senti saresti in grado di farlo col ciclo???