Obtén las mejores soluciones a todas tus preguntas en Revelroom.ca, la plataforma de Q&A de confianza. Explora miles de preguntas y respuestas proporcionadas por una amplia gama de expertos en diversas áreas en nuestra plataforma de preguntas y respuestas. Haz tus preguntas y recibe respuestas detalladas de profesionales con amplia experiencia en diversos campos.

como dibujar un triangulo en turbo pascal y su codoficacion



Sagot :

te dejo los pasos:

 

program triangulo;
uses crt;
var
i,n,CONT:integer;
begin
CONT:=1;
writeln ('introduzca la longitud');
readln (n);
writeln;
writeln;
while (CONT<=n) do
begin
for i:=1 to CONT do
write ('0');
writeln;
CONT:=CONT+1;
end;
readln;
end.

 

 

listo saludos