Programa que dado la tabla de multiplicar a aprender, pregunta la respuesta y muestra si es correcto o incorrecto.

Inicio
    Escribir "introduce el numero de la tabla por aprender";
    Leer a;
    b<-0;
    Para z<-1 Hasta 10 Hacer
        Escribir " ", z, "*", "",a;
        Leer res;
        tab<-z*a;
        Si tab=res Entonces
            Escribir "correcto";
            b<-b+1;
        Sino
            Escribir "lo siento, se ha equivocado";
            Escribir "la respuesta era ", tab;
        FinSi
    FinPara
    Escribir "";
    Escribir "Has acertado ", b, " veces de 10";
Fin