Faire une figure qui ressemble à un triangle avec setlength

Fermé
doum5000 Messages postés 8 Date d'inscription samedi 10 février 2007 Statut Membre Dernière intervention 27 avril 2016 - Modifié par doum5000 le 23/07/2014 à 13:49
MiniApp Messages postés 654 Date d'inscription lundi 21 juillet 2014 Statut Membre Dernière intervention 22 février 2019 - 23 juil. 2014 à 14:52
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é
@
@ @
@ @ @
@ @ @ @

1 réponse

MiniApp Messages postés 654 Date d'inscription lundi 21 juillet 2014 Statut Membre Dernière intervention 22 février 2019 49
23 juil. 2014 à 13:57
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 8 Date d'inscription samedi 10 février 2007 Statut Membre Dernière intervention 27 avril 2016
23 juil. 2014 à 14:00
je voudrais le programme en Pascal et non en Delphi.
0
MiniApp Messages postés 654 Date d'inscription lundi 21 juillet 2014 Statut Membre Dernière intervention 22 février 2019 49
23 juil. 2014 à 14:04
Delphi resemble au Pascal du coup j'ai pensée que sa pourrait être utile
0
doum5000 Messages postés 8 Date d'inscription samedi 10 février 2007 Statut Membre Dernière intervention 27 avril 2016
23 juil. 2014 à 14:47
Votre idée est bonne mais avec plus de commandes, cela serait encore mieux. Merci pour ta réaction.
0
MiniApp Messages postés 654 Date d'inscription lundi 21 juillet 2014 Statut Membre Dernière intervention 22 février 2019 49
23 juil. 2014 à 14:52
Merci. Désolé mais je ne peut pas t'aider plus. :'-(
0