Arreglos en pseint. Problema 75

Enunciado: Busque un números en 7 números ingresados y determine la posición y si existe o no el números buscado, use el método de búsqueda secuencial.



//BUSQUE UN NUMERO EN 7 NUMEROS INGRESADOS Y DETERMINE LA POSICION Y SI EXISTE
//O NO EL NUMERO BUSCADO,USE EL METODO DE BUSQUEDA SENCUENCIAL
Proceso Ejercicio5
   
    //Declaramos variables 
    Definir num, nb,p,i como entero;
    Definir t como entero;
   
    definir r como cadena;
   
    t=7;
    nb=0;
   
    //Definimos el array
    Dimension num[t];
   
    //Introducimos valores
    Para i<-1 Hasta t Con Paso 1 Hacer
        Escribir "Introduce un valor para la posición ",i;
        leer num[i];
    Fin Para   
   
    escribir "El valor a buscar, ingreselo: ";
    leer nb;
   
    r= "no existe";
    p= -1;
   

    Para i<-1 Hasta t Con Paso 1 Hacer
       
        Si num[i] = nb Entonces       
            r="Si existe";
            p=i;
        FinSi
       
    FinPara
   
    Escribir "El numero a buscar ", r, " se encuentra en la posicion ", p;
FinProceso