Segíteni nekem vki programozásban?

Pascalban kéne kiírni h ha beadok 1 számot akkor az osztható-e 6-al?Már több féle képpen próbáltam és nem megy.

program asd;

uses crt ;

var

a,b : integer ;

begin

clrscr ;

write('Kérem az "A"-t: ') ;

readln(a) ;

write('Kérem a "B"-t: ') ;

readln(b) ;

if b = 0 then write('Nullával való osztásnak nincs értelme!')

else if a mod b = 0 then write('Osztója')

else write('Nem osztója');

readln ;

end.

így megy de be kell adnom a b-t (6-ot)h megoldja.