IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Langage Pascal Discussion :

Comment présenter des données


Sujet :

Langage Pascal

  1. #1
    Rédacteur/Modérateur

    Avatar de Roland Chastain
    Homme Profil pro
    Enseignant
    Inscrit en
    Décembre 2011
    Messages
    4 058
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 50
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Décembre 2011
    Messages : 4 058
    Points : 15 339
    Points
    15 339
    Billets dans le blog
    9
    Par défaut Comment présenter des données
    Bonjour à tous !

    Question d'un débutant en Pascal :

    Quel est l'équivalent du "data" employé en Basic ? S'il n'y en a pas (comme je crois le comprendre), quelle est la bonne façon de faire la même chose en Pascal ?

    Mettons que je veuille "stocker" dans mon programme les valeurs initiales d'un échiquier avec ses pièces pour pouvoir au moment voulu attribuer ces valeurs aux variables d'un tableau. En Basic, je fais ça :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
     
    data 8, 4, 6, 10, 12, 6, 4, 8
    data 2, 2, 2, 2, 2, 2, 2, 2
    data 0, 0, 0, 0, 0, 0, 0, 0
    data 0, 0, 0, 0, 0, 0, 0, 0
    data 0, 0, 0, 0, 0, 0, 0, 0
    data 0, 0, 0, 0, 0, 0, 0, 0
    data 1, 1, 1, 1, 1, 1, 1, 1
    data 7, 3, 5, 9, 11, 5, 3, 7
    Comment dois-je faire en Pascal ? Pourriez-vous me mettre sur la voie ?

    Merci d'avance !
    Mon site personnel consacré à MSEide+MSEgui : msegui.net

  2. #2
    Expert confirmé

    Inscrit en
    Août 2006
    Messages
    3 939
    Détails du profil
    Informations forums :
    Inscription : Août 2006
    Messages : 3 939
    Points : 5 648
    Points
    5 648
    Par défaut
    Vie,

    Comme il s'agit de valeurs du même type, tu crées un tableau du bon type, de bonne taille, et tu l'initialises comme constante.

    Ex:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
     
    const maxDonnees = 3;
     
    type
       monTableauDonnees = array [0..maxDonnees] of integer;
     
    const
       monTableau : monTableauDonnees = (45,12,6);
    Et tu y accèdes comme comme pour n'importe quel tableau, avec des indices de 0 à 2 dans le cas cité.
    Si les cons volaient, il ferait nuit à midi.

  3. #3
    Rédacteur/Modérateur

    Avatar de Roland Chastain
    Homme Profil pro
    Enseignant
    Inscrit en
    Décembre 2011
    Messages
    4 058
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 50
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Décembre 2011
    Messages : 4 058
    Points : 15 339
    Points
    15 339
    Billets dans le blog
    9
    Par défaut
    Merci bien pour ta réponse, et pour l'exemple qui est très clair. Je vais m'en servir tout de suite.
    Mon site personnel consacré à MSEide+MSEgui : msegui.net

  4. #4
    Expert confirmé

    Inscrit en
    Août 2006
    Messages
    3 939
    Détails du profil
    Informations forums :
    Inscription : Août 2006
    Messages : 3 939
    Points : 5 648
    Points
    5 648
    Par défaut
    Bie,

    Oui, sauf qu'avec le code que j'ai donné, le tableau pourra contenir 4 données, indices 0 à 3.

    Ça commence à faire plus de 10 ans que je ne fais plus de Pascal, et j'ai vraiment pris le plis des tableaux en C, C++ ..., en mélangeant quand même un peu avec la syntaxe Pascal, sans trop réfléchir.

    Aïe, pas taper.
    Si les cons volaient, il ferait nuit à midi.

  5. #5
    Rédacteur/Modérateur

    Avatar de Roland Chastain
    Homme Profil pro
    Enseignant
    Inscrit en
    Décembre 2011
    Messages
    4 058
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 50
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Décembre 2011
    Messages : 4 058
    Points : 15 339
    Points
    15 339
    Billets dans le blog
    9
    Par défaut
    Je me suis posé la question et, après vérification dans le manuel, j'ai compris que c'était une faute de frappe. Merci quand même d'avoir rectifié.

    Voici donc mon premier petit bout de programme en Pascal :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
     
    program tablier; {Tableaux de constantes}
    uses crt;
    var i: shortint;
    type
       occupant=array [1..64] of integer;
       symboles=array [0..6] of char;
    const
    	occupantINI : occupant=(
    	-4,-2,-3,-5,-6,-3,-2,-4,
    	-1,-1,-1,-1,-1,-1,-1,-1,
    	-0,-0,-0,-0,-0,-0,-0,-0,
    	-0,-0,-0,-0,-0,-0,-0,-0,
    	-0,-0,-0,-0,-0,-0,-0,-0,
    	-0,-0,-0,-0,-0,-0,-0,-0,
    	+1,+1,+1,+1,+1,+1,+1,+1,
    	+4,+2,+3,+5,+6,+3,+2,+4);
    	symbolFR : symboles=(chr(176),'P','C','F','T','D','R');
    	symbolEN : symboles=(chr(176),'P','N','B','R','Q','K');
    BEGIN
    TextBackground(Blue);
    TextColor(White);
    clrscr;
    for i:=1 to 64 do
    	begin
    	write (symbolFR[Abs(occupantINI[i])]);
    	if i/8=trunc(i/8) then writeln;
    	end;
    readln;
    END.
    Il y a quelques jours que je me suis mis sérieusement au Pascal, après avoir écrit un programme d'échecs en Basic. Le C, je ne connais pas. Je le regrette d'ailleurs, car beaucoup de programmes que j'aimerais étudier sont écrits dans ce langage. Il faudra que je m'y mette.

    J'ai déjà posté dans une autre rubrique du forum un lien vers mon précédent programme (sur lequel je travaille toujours). Je me permets de le reproduire ici, au cas où cela intéresserait quelqu'un :

    http://www.eschecs.fr
    Mon site personnel consacré à MSEide+MSEgui : msegui.net

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Comment récupérer des données de Outlook Express ?
    Par frenchsting dans le forum API, COM et SDKs
    Réponses: 6
    Dernier message: 29/04/2005, 12h07
  2. Réponses: 3
    Dernier message: 20/01/2005, 20h19
  3. CFile : comment lire des données
    Par romeo9423 dans le forum MFC
    Réponses: 3
    Dernier message: 25/10/2004, 20h10
  4. Comment récuperer des données entrées au clavier?
    Par Elisée A. dans le forum MFC
    Réponses: 2
    Dernier message: 13/02/2004, 08h22

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo