Error de sintaxis de Pascal, ";" esperado pero "ELSE" encontrado [duplicado] - pascal, freepascal

Soy nueva programación, así que sé amable ... Compilo y obtuve el error mencionado en el título, el código continúa.

while n>1 do
if n mod p= 0   then
write(p);
n:= n div p;
else p:= p+1
end
end.

Me gustaría saber qué hay de malo en eso. "else"

Respuestas

Te olvidas de agregar "begin-end" después de "then" Necesitas hacerlo en caso de que tengas más de una instrucción.

while n>1 do
if n mod p= 0   then
Begin
write(p);
n:= n div p;
End else p:= p+1
end
end.