Somente vendo o código pra poder dizer, erro de divisão por zero é basicamente o que o nome diz, não é possível fazer divisão por zero, então a solução é evitar isso através da lógica que eu mostro no canal,
por exemplo, se a gente quer dividir A / B
Precisamos garantir que B não é 0.
Podemos fazer isso
Se (B > 0) entao X := A / B
Dessa forma ele só vai realizar o cálculo se B não for 0 e por tanto não vai causar o erro,
//HS
