Programa en el que pide ingresar un país de centro américa y muestra la capital de este.
Proceso capitales
Definir es, hond, guat, cost, pana, nic Como Caracter;
Definir pais, sc Como Caracter;
es<-"san salvador";
hond<-"tegucigalpa";
guat<-"guatemala";
cost<-"san jose";
pana<-"panama";
nic<-"managua";
Repetir
Escribir "ingrese pais";
Leer pais;
Si pais="el salvador" | pais="EL SALVADOR" | pais="El Salvador" | pais="elsalvador" | pais="ELSALVADOR" Entonces
Escribir "la capital es:", es;
Sino
si pais="honduras" | pais="HONDURAS" | pais="Honduras" Entonces
Escribir "la capital es:", hond;
Sino
si pais="guatemala" | pais="GUATEMALA" | pais="Guatemala"  Entonces
Escribir "la capital es:", guat;
Sino
si pais="costa rica" | pais="COSTA RICA" | pais="Costa Rica" | pais="costarica" | pais="COSTARICA"  Entonces
Escribir "la capital es:", cost;
Sino
si pais="panama" | pais="PANAMA" | pais="Panama" Entonces
Escribir "la capital es:", pana;
Sino
si pais="nicaragua" | pais="NICARAGUA" | pais="Nicaragua" Entonces
Escribir "la capital es:", nic;
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi
Escribir "si desea continuar ingrese: si, sino, igrese: no";
Leer sc;
Hasta Que sc="no" | sc="NO"
FinProceso