Pascal/Turbo Pascal - Dibujar triangulo rectangulo

 
Vista:
sin imagen de perfil

Dibujar triangulo rectangulo

Publicado por Agustin (1 intervención) el 14/08/2021 00:58:05
Buenas tardes, estoy iniciandome en pascal y estoy trabado con este ejercicio

Diseñe el algoritmo que genere un triángulo rectángulo, con esta forma:
1
1 2
1 2 3
1 2 3 4
…….
1 2 3 4 5 6 7 8 9 ……N

me gustaria que puedan orientarme desde ya muchas gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Dibujar triangulo rectangulo

Publicado por ramon (2158 intervenciones) el 14/08/2021 13:47:18
Es algo como esto.

program rectangle;
uses
crt;
var
y, x : integer;


procedure rentan;
begin
for x := 1 to 4 do
begin
for y := 1 to x do
write(y);
writeln;
end;
end;

begin
clrscr;
rentan;
readln;
end.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar