Ayuda ciclos for anidados en FoxPro
Publicado por Angel (1 intervención) el 08/07/2016 18:07:03
Buenos dias amigos nesecito de su ayuda con respecto a un codigo parecido a la piramide de pescal con la diferencia que en este caso se le agrega un rectangulo en la parte de abajo para formar una casa.
Lo unico que he podido hacer hasta ahorita es que me salga el triangulo (piramide) girado a 45° a la izquierda todo debe hacerse solo con ciclo for
Este es el codigo que tengo hasta ahora.
Agradeceria su ayuda y colaboracion de antemano muchas gracias...
Lo unico que he podido hacer hasta ahorita es que me salga el triangulo (piramide) girado a 45° a la izquierda todo debe hacerse solo con ciclo for
Este es el codigo que tengo hasta ahora.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
*!* Imprime la piramide en la pantalla del programa
*!* Primer for imprime la altura de la piramide
for alp = 1 to 10?allt(str(alp))
*!* Segundo for imprime el ancho de la piramida
for anp = 10 to alp step -1
??allt(str(anp))
next
next
*!* Imprime el rectangulo bajo el triangulo
*!* Primer for imprime el alto del rectangulo
for alr = 1 to 4?allt(str(alr))
*!* Segundo for imprime el ancho del rectangulo
for anr = 10 to 1 step -1
??allt(str(anr))
next
next
Agradeceria su ayuda y colaboracion de antemano muchas gracias...
Valora esta pregunta
0