單數

如何寫:

當AA的值的小數點后1位為單數(如15.1)時AA=AA+0.1

aa:=15.1;

aa:=if(MOD(AA*10,2)<>0,aa+0.1,aa);

那雙改單呢?

aa:=15;

aa:=if(MOD(AA*10,2)=0,aa+0.1,aa);  ??