Ejercicio 20 de Speint: programa que dice las capitales de los países centro americanos

Proceso Capitales
Definir c Como Entero;
Definir a como cadena;

Escribir "País: ";
Leer a;
si a = "Panamá" | a = "Panama" | a = "panama" | a = "panamá" entonces
Escribir "Panamá";
Sino
si a = "Belice" | a = "belice" | a = "velice" | a = "Velice" Entonces
Escribir "Belmopan";
Sino
si a = "Costa Rica" | a = "costa rica" | a = "Costa rica" | a = "costa Rica" Entonces
Escribir "San José";
Sino
si a = "El Salvador" | a = "el salvador" | a = "El salvador" | a = "el Salvador" Entonces
Escribir "San Salvador";
Sino
si a = "Guatemala" | a = "guatemala" Entonces
Escribir "Ciudad de Guatemala";
Sino
si a = "Honduras" | a = "honduras" | a = "onduras" | a = "Onduras" Entonces
Escribir "Tegucigalpa";
Sino
si a = "Nicaragua" | a = "nicaragua" Entonces
Escribir "Managua";
Sino
//nada//
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi

FinProceso