Algoritmo busqueda_Lineal Definir a,b,i Como Entero; Definir flag Como Logico;

flag = Falso;

Dimension a[10];

a[0] = 15;
a[1] = 10;
a[2] = 3;
a[3] = -8;
a[4] = 30;
a[5] = 5;
a[6] = 68;
a[7] = 1;
a[8] = 7;
a[9] = 2;

Escribir "Digite el numero a buscar: ";
Leer b;

Para i = 0 Hasta 9 Con Paso 1 Hacer
	si b = a[i] Entonces
		Escribir "El numero se encuentra en el indice ", i;
		flag = Verdadero;
	FinSi
FinPara

si flag = Falso Entonces
	Escribir "El numero no se encuentra en el arreglo"; 
FinSi

FinAlgoritmo