Proceso Tablas_de_multiplicar
definir a,b,c como entero;
Para a<-1 Hasta 10 Con Paso 1 Hacer
Escribir "tabla ", a;
Para b<-1 Hasta 10 Con Paso 1  Hacer
c<-a*b;
Escribir a," x ", b," = ",c ;
FinPara
FinPara
FinProceso