ley de ohm

el siguiente codigo es para poder generar el valor de la intencidad de corriente a partir de tener los valores de voltage y resistencia

Proceso calcular_intencidad
Escribir "ingrese el valor del voltaje";
leer voltage;
Escribir "ingrese valor de la resistencia";
Leer resistencia;
si (resistencia >0) Entonces intencidad <-voltage/resistencia;
Escribir "resultado=",intencidad;
Sino Escribir "chuuuuuuu";
FinSi
FinProceso