Ti basta verificare che la divisione abbia resto.
Se ha resto prendi la parte intera ed aggiungi uno, se non ce l'ha lasci così com'è.

codice:
if total mod 3 = 0 then 'resto 0
pagtot = total/3
else 'c'è il resto
pagtot = int(total/3) + 1
end if
Roby