Faire une figure qui ressemble à un triangle avec setlength

doum5000 Messages postés 13 Statut Membre -  
MiniApp Messages postés 680 Statut Membre -
Bonjour,

voici un programme réalisé avec la commande setlength mais je n'arrive même pas à le compiler sous Pascal. Aidez moi, s'il vous plait.

Program triangle;
uses crt;
var
t:[0..3] of [0..3] of integer;
i:integer;
begin
setlength(t,3);
for i:0 to 3 do
setlength(t[i], i+1);
end.


voici le resultat souhaité
@
@ @
@ @ @
@ @ @ @
A voir également:

1 réponse

MiniApp Messages postés 680 Statut Membre 49
 
Bonjour

Je programme en Delphi, si je voulait faire une application console faisant ce résultat je taperais.

Program triangle;
{$APPTYPE CONSOLE}
uses sysutils;

begin
//Tracer de la pyramide
Writeln('@');
Writeln('@@');
Writeln('@@@');
Writeln('@@@@');
Readln;//Empêche la fenêtre de se fermer
end.
0
doum5000 Messages postés 13 Statut Membre
 
je voudrais le programme en Pascal et non en Delphi.
0
MiniApp Messages postés 680 Statut Membre 49
 
Delphi resemble au Pascal du coup j'ai pensée que sa pourrait être utile
0
doum5000 Messages postés 13 Statut Membre
 
Votre idée est bonne mais avec plus de commandes, cela serait encore mieux. Merci pour ta réaction.
0
MiniApp Messages postés 680 Statut Membre 49
 
Merci. Désolé mais je ne peut pas t'aider plus. :'-(
0