Programación General => Pascal => Mensaje iniciado por: zazo en Martes 28 de Octubre de 2008, 17:51
Título: Dibujar un triángulo
Publicado por: zazo en Martes 28 de Octubre de 2008, 17:51
Necesito dibujar un triángulo indicándole el número de filas y columnas, de manera que quede así:
Código: Text
****
***
**
*
Este serían 4 columnas y 4 filas.
*****
***
*
Este 5 columnas y 3 filas.
No puedo usar ni procedimientos ni funciones.
Mi código es el siguiente:
Código: Text
program triangulo;
var
a,b,c,d:integer;
Begin
writeln('Ingrese filas');
readln(a);
writeln('Ingrese columnas');
for b:=1 to a do
begin
for c:=a downto b do
begin
write('*');
end;
writeln;
end;
End.
El problema es que sólo me hace triángulos con igual número de filas que de columnas y además, me los hace de la siguiente manera:
**** *** ** *
que es distinta a la que me piden.
Alguien me puede echar un cable?
Muchas gracias!
Título: Re: Dibujar un triángulo
Publicado por: m0skit0 en Miércoles 29 de Octubre de 2008, 09:05
Primero, ¿para qué quieres que se ingresen las columnas? El número de columnas está definido por el de filas. Y tienes declaradas variables de sobra.
Código: Pascal
program triangulo;
var
a,b,c:integer;
Begin
writeln('Ingrese filas');
readln(a);
for b:=1to a do
begin
for c:=1to b do
begin
write(' ');
end;
for c:=a downto b do
begin
write('*');
end;
writeln;
end;
End.
Título: Re: Dibujar un triángulo
Publicado por: zazo en Miércoles 29 de Octubre de 2008, 11:42
Muchas gracias por contestar!
Ese es el problema, necesito las dos variables.
Lo que quiero es hacer un triángulo en el que puedan ser independientes el número de columnas y el de filas, para construir triángulos como el del ejemplo que puse de 5 columnas y 3 filas.
Tal y como tengo el código,como has visto, no lo son, una depende de la otra y sobra.
Ese es mi problema,no consigo hacerlas independientes, porque siempre que modifico el código o se me hacen bucles o me sale sólo un asterisco...
No sé si me explicado bien.
Título: Re: Dibujar un triángulo
Publicado por: m0skit0 en Miércoles 29 de Octubre de 2008, 12:38
Te has explicado, pero siguen habiendo flecos...
Supongo que se ha solucionado el problema de la visualización de los asteriscos, porque no comentas nada...
¿Cómo sabes cuántos asteriscos van por fila? Es decir, imagina que filas = 4 y columnas = 5. ¿cuál sería la salida?
Código: Text
*****
****
***
**
O bien
Código: Text
*****
***
**
*
O bien
Código: Text
*****
****
**
*
etc...
Título: Re: Dibujar un triángulo
Publicado por: zazo en Miércoles 29 de Octubre de 2008, 13:29
Edito!!.
Sí que se ha resuelto el problema de la visualización! Muchas gracias!
En cuanto a los asteriscos, la verdad es que ahí me he quedado pillado!
En el enunciado del problema dan dos ejemplos de representación:
Código: Text
******
***** 6 filas y 6 columnas
****
***
**
*
*****
*** 3 filas y 5 columnas
*
Y claro, el caso que me has planteado de 4 y 5 me ha roto los esquemas, pues no veo cuál de todos los ejemplos que pusiste se ajustaría a esto.
Título: Re: Dibujar un triángulo
Publicado por: m0skit0 en Miércoles 29 de Octubre de 2008, 15:00
Cita de: "zazo"
En cuanto a los asteriscos, la verdad es que ahí me he quedado pillado!
Seguro que se les pasó a quienes te dieron el enunciado también. Suele pasar... :mellow:
Título: Re: Dibujar un triángulo
Publicado por: zazo en Miércoles 29 de Octubre de 2008, 16:14
Pues no sé, si sólo me fijara en esos ejemplos, el primero ya lo dibuja, y con un If podría separarlos. Pero tendría que pensar en un algoritmo común para el resto de casos.
También, creo que debería delimitar que c > a, poniendo además como valores mínimos 2 y 2 respectivamente. Como valores máximos en el enunciado me dicen que tienen que ser para las columnas 80 y para las filas 24.
No sé si esto último me ayuda a la hora de pensar en la representación. Porque yo sólo veo que la razón es 10/3.
Edito, me colé en valores, pensé en 2 y 2. Aunque viendo que en otra parte del diseño me pide dibujar triángulos con huecos, ampliaría a 3.