Pascal/Turbo Pascal - DIVISION ENTRE CERO DE PASCAL

buenas noches, quiero saber como ago para que pascal no divida entre cero.. osea..
por ejemplo crear un programa que divida A entre B, pero poniendo q B no puede valer 0 cero, en tal caso si el usuario pone B 0 hacerle una acotacion para que vuelva a poner otro numero....

SOy nuevo en pascal, e puesto el aviso de la division por cero, pero no encuentro la forma de ponerle que ponga otro numero.. gracias

el programa sería algo así:

writeln('dame dos numeros');
readln(a,b);

if (b<>0) then
resultado=a/b
else
writeln('No se pueden dividir');