Pseudocódigo 10

Realizar un algoritmo el cual convierta kilómetros a millas

Proceso kilometros_a_millas //Cruz Sosa Aldo Ing.Biomedica "B"
    Definir km,millas,equivalencia Como Real;
    equivalencia<-1.60934;
    Escribir " ***Bienvenido Usuario*** ";
    Escribir " cuantos km desea convertir a millas? ";
    leer km;
    millas<-km/equivalencia;
    Escribir km, " km. equivalen a: ",millas," millas ";
 FinProceso