[ ***************************************************
*****************
** BuclesAnidados.pd: Imprime las tablas de multiplicar del 1 al 9.
*****************
*****************************************************
Copyright 2016 Alejandro Linarez Rangel

Licensed under the Apache License, Version 2.0 (the "License");
you may not use this file except in compliance with the License.
You may obtain a copy of the License at

 http://www.apache.org/licenses/LICENSE-2.0

Unless required by applicable law or agreed to in writing, software
distributed under the License is distributed on an "AS IS" BASIS,
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
See the License for the specific language governing permissions and
limitations under the License.
*************************************************** ]

adquirir numero
adquirir otro
adquirir resultado

adquirir hasta

fijar numero a {1}
fijar otro a {1}
fijar resultado a {1}
fijar hasta a {9}

mientras comparar Importar.Ent.Comparar numero <= hasta
	mientras comparar Importar.Ent.Comparar otro <= hasta
		Importar.Ent.Multiplicar numero otro resultado
		escribir {El resultado de: }
		escribir numero
		escribir { * }
		escribir otro
		escribir { = }
		escribir resultado
		nl
		Importar.Ent.Sumar otro UNO otro
	finbucle
	fijar otro a {1}
	Importar.Ent.Sumar numero UNO numero
finbucle
