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

Turbo Pascal Discussion :

Afficher les lettres les unes après les autres


Sujet :

Turbo Pascal

  1. #1
    Nouveau membre du Club
    Inscrit en
    Novembre 2009
    Messages
    30
    Détails du profil
    Informations forums :
    Inscription : Novembre 2009
    Messages : 30
    Points : 28
    Points
    28
    Par défaut Afficher les lettres les unes après les autres
    Bonjour

    J'aimerais afficher une phrase de manière séquentielle.

    Exemple : soit le mot toiture.
    J'aimerais afficher d'abord t puis o puis i... jusqu'à e chacun à son tour.
    J'ai essayé avec delay mais ça a affiché tout d'une fois.
    Merci de m'aider

  2. #2
    Membre éprouvé
    Avatar de Dr.Who
    Inscrit en
    Septembre 2009
    Messages
    980
    Détails du profil
    Informations personnelles :
    Âge : 45

    Informations forums :
    Inscription : Septembre 2009
    Messages : 980
    Points : 1 294
    Points
    1 294
    Par défaut
    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
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    44
    45
    46
    47
    48
    49
    50
    51
    52
    53
    54
     
     
    // variables de sauvegarde 
    var
      _WS : string; // le mot ou la phrase
      _WL : integer; // la longueur de la chaine
     
    // sauvegarde une chaine
    function registerWord(S: string): integer;
    begin
      _WS := S;
      _WL := Length(S);
      result := _WL;
    end;
     
    // renvois un caractère de _WS
    function stepWord(i : integer): char;
    begin
      if (i >= 1) and (i <= _WL) then
        result := _WS[i];
      else
        result := #0;
    end;
     
     
    // vitesse d'affichage en milliseconde
    const
      Speed = 500;
     
    // etape et taille maximale
    var 
      Step, maxLength : integer;
     
    // début
    begin
      // on commence à 1
      Step := 1;
      // on prépare un mot et on récupère la taille maximale
      maxLength := registerWord('Toiture');
     
      // une boucle, tant que Step est inférieur à taille max
      while Step <= MaxLength do
      begin 
        // affiche la suite du mot
        write( stepWord(Step) );
        // incremente Step
        inc(Step);
        // fait une pause
        delay(Speed);
      end;
     
      // attend qu'on appuis sur une touche pour quitter
      readln;
    end.
    [ Sources et programmes de Dr.Who | FAQ Delphi | FAQ Pascal | Règlement | Contactez l'équipe ]
    Ma messagerie n'est pas la succursale du forum... merci!

  3. #3
    Modérateur
    Avatar de l_autodidacte
    Homme Profil pro
    Retraité : Directeur de lycée/Professeur de sciences physiques
    Inscrit en
    Juillet 2009
    Messages
    2 415
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 68
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Retraité : Directeur de lycée/Professeur de sciences physiques
    Secteur : Enseignement

    Informations forums :
    Inscription : Juillet 2009
    Messages : 2 415
    Points : 5 806
    Points
    5 806
    Par défaut
    Un code un peu plus simple et peut-être plus compréhensible :
    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
     
    Uses crt;
    Var 
        S:String; {Chaine à afficher}
        i:Integer; {Compteur pour la boucle FOR}
    Begin
        TextAttr:=blue Shl 4 +14; ClrScr; {TP pour DOS uniquement : Texte jaune sur Fond bleu. Ce formatage du texte n'est pas obligatoire}
    {On peut donc s'en passer}
        Write('Donner une chaine : ');Readln(S);
        Writeln;
        For i:=1 to length(s) do
          begin
            Write(S[i]);
            Delay(400);
          end;
        Readln;
    End.
    Ce code marche à coup sûr par contre celui proposé par Dr.Who contient des incohérences de types. En plus une fonction doit retourner un résultat, ce qui n'a pas été fait.
    Ne pas oublier le tag si satisfait.
    Voter pour toute réponse satisfaisante avec pour encourager les intervenants.
    Balises CODE indispensables. Regardez ICI
    Toujours utiliser la clause Option Explicit(VBx, VBS ou VBA) et Ne jamais typer variables et/ou fonctions en VBS.
    Vous pouvez consulter mes contributions
    Ne pas oublier de consulter les différentes FAQs et les Cours/Tutoriels VB6/VBScript
    Ne pas oublier L'Aide VBScript et MSDN VB6 Fr

  4. #4
    Expert confirmé
    Avatar de slim_java
    Homme Profil pro
    Enseignant
    Inscrit en
    Septembre 2008
    Messages
    2 272
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 39
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Enseignant
    Secteur : Enseignement

    Informations forums :
    Inscription : Septembre 2008
    Messages : 2 272
    Points : 4 539
    Points
    4 539
    Par défaut
    salut.
    le code fourni par l_autodidacte peut être exécuter sous Turbo Pascal 7 pour DOS ou bien sous FreePascal ou Lazarus

  5. #5
    Expert confirmé
    Avatar de krachik
    Inscrit en
    Décembre 2004
    Messages
    1 964
    Détails du profil
    Informations forums :
    Inscription : Décembre 2004
    Messages : 1 964
    Points : 4 015
    Points
    4 015
    Par défaut
    Bonjour

    Citation Envoyé par l_autodidacte Voir le message
    Un code un peu plus simple et peut-être plus compréhensible :

    Ce code marche à coup sûr par contre celui proposé par Dr.Who contient des incohérences de types. En plus une fonction doit retourner un résultat, ce qui n'a pas été fait.
    Moi je dirai la fonction renvoie bien un résultat parce qu'il y a un result qui récupère la résultat à retourner.
    Maintenant il est vrai qu'on est dans la section Turbo Pascal et le code de Dr.Who ne compilerait pas dessus mais compilerait sous Free Pascal par exemple en apportant quelques changements (ajout de crt, mode de compilation) (bref c'est du code pour delphi).
    Je suis ce que je suis grâce à ce que nous sommes tous Humanité aux Humains!! !

    Entre ce que je pense, ce que je veux dire, ce que je crois dire, ce que je dis ce que vous avez envie d'entendre, ce que vous croyez entendre, ce que vous entendez, ce que vous avez envie de comprendre, ce que vous comprenez ... Il y a dix possibilités que nous ayons des difficultés à communiquer. Mais essayons quand meme ....... E. Wells

  6. #6
    Modérateur
    Avatar de l_autodidacte
    Homme Profil pro
    Retraité : Directeur de lycée/Professeur de sciences physiques
    Inscrit en
    Juillet 2009
    Messages
    2 415
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 68
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Retraité : Directeur de lycée/Professeur de sciences physiques
    Secteur : Enseignement

    Informations forums :
    Inscription : Juillet 2009
    Messages : 2 415
    Points : 5 806
    Points
    5 806
    Par défaut
    Moi je dirai la fonction renvoie bien un résultat
    Une chose et certaine, c'est qu'une fonction qui retourne un résultat(du moins c'est ce que j'ai appris à faire sous TP et BP) doit avoir une structure telle que la suivante(et là je sais que je n'apprends rien à personne) :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
     Function MaFonction(Param1:<type>;Param2:<Type>...) :Type;
    VAR
        var1,var2,[....]:type;
    Begin
       ...........................
       ...........................
     MaFonction:=....(résultat ou Variable de retour);
    End;
    Le fait d'écrire : n'implique rien pour la fonction s'il ne lui a pas été affecté.

    Voici le code intégral de la fonction en question auquel manque l'affectation de result à la fonction StepWord
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    function stepWord(i : integer): char;
    begin
      if (i >= 1) and (i <= _WL) then
        result := _WS[i];
      else
        result := #0;
    end;
    Tu es d'accord avec moi qu'avant le "End;" final de la fonction, on devait mettre : StepWord:=result;

    Que le code compile ou non sous un autre EDI, pour moi(peut-être un peu borné dira-t-on), il a été invoqué sous la rubrique TP et par conséquent, la réponse(ou commentaire) devrait en principe s'y rattacher.
    Ne pas oublier le tag si satisfait.
    Voter pour toute réponse satisfaisante avec pour encourager les intervenants.
    Balises CODE indispensables. Regardez ICI
    Toujours utiliser la clause Option Explicit(VBx, VBS ou VBA) et Ne jamais typer variables et/ou fonctions en VBS.
    Vous pouvez consulter mes contributions
    Ne pas oublier de consulter les différentes FAQs et les Cours/Tutoriels VB6/VBScript
    Ne pas oublier L'Aide VBScript et MSDN VB6 Fr

  7. #7
    Rédacteur
    Avatar de darrylsite
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    1 299
    Détails du profil
    Informations personnelles :
    Localisation : France, Paris (Île de France)

    Informations forums :
    Inscription : Juillet 2007
    Messages : 1 299
    Points : 2 501
    Points
    2 501
    Par défaut
    Citation Envoyé par l_autodidacte Voir le message
    Voici le code intégral de la fonction en question auquel manque l'affectation de result à la fonction StepWord
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    function stepWord(i : integer): char;
    begin
      if (i >= 1) and (i <= _WL) then
        result := _WS[i];
      else
        result := #0;
    end;
    Tu es d'accord avec moi qu'avant le "End;" final de la fonction, on devait mettre : StepWord:=result;

    Que le code compile ou non sous un autre EDI, pour moi(peut-être un peu borné dira-t-on), il a été invoqué sous la rubrique TP et par conséquent, la réponse(ou commentaire) devrait en principe s'y rattacher.
    Si tu as bien remarque, result n'est pas une variable declarée dans la fonction. Comme la dit krachik, le code passe bien sous fpc par exemple mais pas sous tp.
    Tu as tout a fait raison qu'on doit poster un code qui marche sous turbo pascal. Mais c'est un truc qui arrive souvent quand on travaille avec plusieurs langage/compilateur.

  8. #8
    Modérateur
    Avatar de l_autodidacte
    Homme Profil pro
    Retraité : Directeur de lycée/Professeur de sciences physiques
    Inscrit en
    Juillet 2009
    Messages
    2 415
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 68
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Retraité : Directeur de lycée/Professeur de sciences physiques
    Secteur : Enseignement

    Informations forums :
    Inscription : Juillet 2009
    Messages : 2 415
    Points : 5 806
    Points
    5 806
    Par défaut
    Citation Envoyé par darrylsite
    Si tu as bien remarque, result n'est pas une variable declarée dans la fonction
    En fait, la variable result n'est déclarée nulle part. Même si elle est déclarée ailleurs, du moment qu'elle est affectée à la fonction, elle remplit bien sa fonction(rôle).

    Merci pour le commentaire.
    Ne pas oublier le tag si satisfait.
    Voter pour toute réponse satisfaisante avec pour encourager les intervenants.
    Balises CODE indispensables. Regardez ICI
    Toujours utiliser la clause Option Explicit(VBx, VBS ou VBA) et Ne jamais typer variables et/ou fonctions en VBS.
    Vous pouvez consulter mes contributions
    Ne pas oublier de consulter les différentes FAQs et les Cours/Tutoriels VB6/VBScript
    Ne pas oublier L'Aide VBScript et MSDN VB6 Fr

  9. #9
    Expert confirmé
    Avatar de krachik
    Inscrit en
    Décembre 2004
    Messages
    1 964
    Détails du profil
    Informations forums :
    Inscription : Décembre 2004
    Messages : 1 964
    Points : 4 015
    Points
    4 015
    Par défaut
    Citation Envoyé par l_autodidacte
    Tu es d'accord avec moi qu'avant le "End;" final de la fonction, on devait mettre : StepWord:=result;

    Que le code compile ou non sous un autre EDI, pour moi(peut-être un peu borné dira-t-on), il a été invoqué sous la rubrique TP et par conséquent, la réponse(ou commentaire) devrait en principe s'y rattacher.
    le système avec result est un concept introduit en Delphi. result est crée automatiquement par le compilateur dans le but de contenir le retour qui sera attribué à la fonction.
    On est d'accord que le compilateur Turbo Pascal ne reconnaitra ceci; mais ça reste du Pascal:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
     
        result := valeur;
        nomFonction : = valeur;
    C'est 2 lignes sont équivalentes mais ne sont pas acceptés par tous les compilateurs Pascal

    Citation Envoyé par l_autodidacte
    Le fait d'écrire :
    n'implique rien pour la fonction s'il ne lui a pas été affecté.
    pour TP oui .
    Maintenant c'est pas parce qu'on est dans la section Turbo Pascal qu'on ne peut apprendre rien d'autre concernant le langage parce qu'on est avant tout dans la rubrique Pascal.

    Je résume, on est d'accord qu'on doit affecter une valeur à la fonction, le fait d'utiliser result est issu de Delphi (chose qui peut passer sur certains compilateur pascal comme free pascal moyennant des options de compilation).
    Je suis ce que je suis grâce à ce que nous sommes tous Humanité aux Humains!! !

    Entre ce que je pense, ce que je veux dire, ce que je crois dire, ce que je dis ce que vous avez envie d'entendre, ce que vous croyez entendre, ce que vous entendez, ce que vous avez envie de comprendre, ce que vous comprenez ... Il y a dix possibilités que nous ayons des difficultés à communiquer. Mais essayons quand meme ....... E. Wells

  10. #10
    Expert confirmé

    Inscrit en
    Août 2006
    Messages
    3 941
    Détails du profil
    Informations forums :
    Inscription : Août 2006
    Messages : 3 941
    Points : 5 652
    Points
    5 652
    Par défaut
    Via,

    Et il faudrait en profiter pour abandonner les dinosaures à leur sort.
    Si les cons volaient, il ferait nuit à midi.

  11. #11
    Rédacteur
    Avatar de darrylsite
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    1 299
    Détails du profil
    Informations personnelles :
    Localisation : France, Paris (Île de France)

    Informations forums :
    Inscription : Juillet 2007
    Messages : 1 299
    Points : 2 501
    Points
    2 501
    Par défaut
    Citation Envoyé par droggo Voir le message
    Via,

    Et il faudrait en profiter pour abandonner les dinosaures à leur sort.
    C'est peut etre une façon de faire de l'histoire

  12. #12
    Expert confirmé

    Inscrit en
    Août 2006
    Messages
    3 941
    Détails du profil
    Informations forums :
    Inscription : Août 2006
    Messages : 3 941
    Points : 5 652
    Points
    5 652
    Par défaut
    Qia,
    Citation Envoyé par darrylsite Voir le message
    C'est peut etre une façon de faire de l'histoire
    Si tu vois une seule raison logique d'encore utiliser TP, en dehors de vouloir faire un programme destiné à être exécuté sur un dinosaure des ordinateurs (j'aime bien les dinos ).

    On dispose de bien mieux, et pour les nostalgiques de l'interface TP, FreePascal propose la même.

    Et j'irai plus loin : sauf nécessité absolue (qu'il faudra justifier), continuer à programmer en mode console, ça me fait sauter de rire jusqu'au plafond, et je ne vais pas plus haut à cause du plafond, justement.
    Si les cons volaient, il ferait nuit à midi.

  13. #13
    Modérateur
    Avatar de l_autodidacte
    Homme Profil pro
    Retraité : Directeur de lycée/Professeur de sciences physiques
    Inscrit en
    Juillet 2009
    Messages
    2 415
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 68
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Retraité : Directeur de lycée/Professeur de sciences physiques
    Secteur : Enseignement

    Informations forums :
    Inscription : Juillet 2009
    Messages : 2 415
    Points : 5 806
    Points
    5 806
    Par défaut
    Salut krachik;

    Je suis tout à fait d'accord pour l'apprentissage de quelque chose de nouveau, mais si la personne demandant l'aide ne connaît que TP ou BP , ne vaut-il pas mieux lui répondre selon ses besoins ?

    Par ailleurs, je présume que la variable result du code concerné reste dans un buffer(ou mémoire tampon) tout au long du programme(à l'exécution) ce qui la rend accessible à tout moment si elle n'a pas été vidée de son contenu par un autre usage.
    Merci pour la précision

    Salut Droggo;
    Et il faudrait en profiter pour abandonner les dinosaures à leur sort
    Je ne défends un EDI spécifique mais ce sont ces dinosaures qui nous ont permis de faire les premiers pas dans la programmation et sa logique.
    De nos jours, on utilise encore ces dinosaures dans nos écoles et lycées pour l'apprentissage de l'algorithmique. Pourquoi donc les abandonner à leur sort ?
    L'évolution n'est pas synonyme de rayer le passé mais d'en prendre les bonnes choses pour continuer.

    continuer à programmer en mode console....
    Le plus souvent, on code en vue d'avoir une application console. Mais lorsqu'on on utilise les objets(POO), là on a une interface graphique avec gestion de la souris et tout......
    Donc ce n'est pas tout à fait un dinosaure qu'on a devant soi.
    Ne pas oublier le tag si satisfait.
    Voter pour toute réponse satisfaisante avec pour encourager les intervenants.
    Balises CODE indispensables. Regardez ICI
    Toujours utiliser la clause Option Explicit(VBx, VBS ou VBA) et Ne jamais typer variables et/ou fonctions en VBS.
    Vous pouvez consulter mes contributions
    Ne pas oublier de consulter les différentes FAQs et les Cours/Tutoriels VB6/VBScript
    Ne pas oublier L'Aide VBScript et MSDN VB6 Fr

  14. #14
    Expert confirmé

    Inscrit en
    Août 2006
    Messages
    3 941
    Détails du profil
    Informations forums :
    Inscription : Août 2006
    Messages : 3 941
    Points : 5 652
    Points
    5 652
    Par défaut
    Gia,

    Rendez-vous quand on aura des processeurs 1024 cœurs avec des bus 1024 bits.

    Vous utiliserez sans doute encore TP, et vous vous demanderez pourquoi le système d'exploitation ne veut pas de votre programme en natif, et exoge donc de charger un émulateur. Bonne chance.

    J'ai déjà précisé que FreePascal donne tout ce que TP proposait, et bien plus. Donc pourquoi persister ?

    Et pour vouloir "Le plus souvent, on code en vue d'avoir une application console.", ben c'est en raisonnant comme ça qu'on devient dinosaure soi-même.

    Il y a une éternité (au moins ) que je ne fais plus d'applications console (pour mon travail de développeur) et je m'en porte très bien.

    Comme enseignant, je pousse mes élèves vers les GUI, la plupart le demandent d'ailleurs rapidement après les 2 ou 3 premiers cours (ce qui est un peu tôt pour la plupart).
    C'est donc uniquement pour les débutants parmi les débutants que la console devrait être utilisée, le temps d'apprendre les bases "basiques" du langage.


    Au fait, pour result, ce n'est qu'une variable locale créée automatiquement par le compilateur, qui sait alors qu'il faut renvoyer ce qu'elle contient si on ne précise pas un retour avec la syntaxe standard du Pascal.
    Elles n'est donc accessible qu'à l'intérieur de la fonction.
    Si les cons volaient, il ferait nuit à midi.

  15. #15
    Modérateur
    Avatar de l_autodidacte
    Homme Profil pro
    Retraité : Directeur de lycée/Professeur de sciences physiques
    Inscrit en
    Juillet 2009
    Messages
    2 415
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 68
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Retraité : Directeur de lycée/Professeur de sciences physiques
    Secteur : Enseignement

    Informations forums :
    Inscription : Juillet 2009
    Messages : 2 415
    Points : 5 806
    Points
    5 806
    Par défaut
    Je ne suis pas contre l'innovation, si tu vois ce que je veux dire. Mais en tant que dinosaure que je suis(ben c'est en raisonnant comme ça qu'on devient dinosaure soi-même et là ce sont tes propos), je suis également enseignant mais de sciences physiques et de mathématiques.

    Je ne suis qu'un simple autodidacte(voir mon pseudo) en informatique; car quand j'étais étudiant, à la Fac, nous entendions uniquement parler d'ordinateurs et d'informatique. On les a pas vus ni touchés....
    Ne pas oublier le tag si satisfait.
    Voter pour toute réponse satisfaisante avec pour encourager les intervenants.
    Balises CODE indispensables. Regardez ICI
    Toujours utiliser la clause Option Explicit(VBx, VBS ou VBA) et Ne jamais typer variables et/ou fonctions en VBS.
    Vous pouvez consulter mes contributions
    Ne pas oublier de consulter les différentes FAQs et les Cours/Tutoriels VB6/VBScript
    Ne pas oublier L'Aide VBScript et MSDN VB6 Fr

  16. #16
    Expert confirmé

    Inscrit en
    Août 2006
    Messages
    3 941
    Détails du profil
    Informations forums :
    Inscription : Août 2006
    Messages : 3 941
    Points : 5 652
    Points
    5 652
    Par défaut
    Eie,
    Citation Envoyé par l_autodidacte Voir le message
    Je ne suis pas contre l'innovation, si tu vois ce que je veux dire. Mais en tant que dinosaure que je suis(ben c'est en raisonnant comme ça qu'on devient dinosaure soi-même et là ce sont tes propos), je suis également enseignant mais de sciences physiques et de mathématiques.

    Je ne suis qu'un simple autodidacte(voir mon pseudo) en informatique; car quand j'étais étudiant, à la Fac, nous entendions uniquement parler d'ordinateurs et d'informatique. On les a pas vus ni touchés....
    Alors, quand une personne ne connaît que TP et/ou BP, apprends-lui qu'il existe autre chose de bien meilleur.
    Ce qui n'empêche pas de répondre aux questions posées, bien entendu, sinon le forum ne sert plus à grand chose.

    Pour les ordis etc., quand j'ai commencé à apprendre la programmation, on travaillait sur un "gros" mainframe ("gros" pour l'époque, mais il ferait rire n'importe quel lycéen avec sa petite calculette ).
    On n'avait fait qu'une visite pour voir le matériel et le personnel (dont les "perforatrices", qui tapaient notre code sur les cartes perforées).
    En moyenne, une fois le code écrit, il fallait 2 à 4 semaines pour avoir le premier retour, qui était trop souvent "refus de compilation", pour une erreur quelconque ...
    La micro a vraiment changé tout ça, et c'est heureux.
    Si les cons volaient, il ferait nuit à midi.

  17. #17
    Expert confirmé
    Avatar de slim_java
    Homme Profil pro
    Enseignant
    Inscrit en
    Septembre 2008
    Messages
    2 272
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 39
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Enseignant
    Secteur : Enseignement

    Informations forums :
    Inscription : Septembre 2008
    Messages : 2 272
    Points : 4 539
    Points
    4 539
    Par défaut
    Citation Envoyé par droggo Voir le message
    Pour les ordis etc., quand j'ai commencé à apprendre la programmation, on travaillait sur un "gros" mainframe ("gros" pour l'époque, mais il ferait rire n'importe quel lycéen avec sa petite calculette ).
    On n'avait fait qu'une visite pour voir le matériel et le personnel (dont les "perforatrices", qui tapaient notre code sur les cartes perforées).
    En moyenne, une fois le code écrit, il fallait 2 à 4 semaines pour avoir le premier retour, qui était trop souvent "refus de compilation", pour une erreur quelconque ...
    salut.
    Existe-t-il un musée en France pour voir ces dinosaures ?
    j'ai pas vécu cette époque

  18. #18
    Expert confirmé

    Inscrit en
    Août 2006
    Messages
    3 941
    Détails du profil
    Informations forums :
    Inscription : Août 2006
    Messages : 3 941
    Points : 5 652
    Points
    5 652
    Par défaut
    Hou,

    Ce genre de musée existe peut-être, mais je n'en ai pas connaissance, et je doute un peu qu'on puisse trouver ça en France (mais ce n'est qu'un a priori).

    Pour te donner une idée, le "gros" mainframe dont je parle disposait de 32 Ko.
    Tu as bien lu : 32 Kilo-octets !!!
    Si les cons volaient, il ferait nuit à midi.

  19. #19
    Modérateur
    Avatar de l_autodidacte
    Homme Profil pro
    Retraité : Directeur de lycée/Professeur de sciences physiques
    Inscrit en
    Juillet 2009
    Messages
    2 415
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 68
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Retraité : Directeur de lycée/Professeur de sciences physiques
    Secteur : Enseignement

    Informations forums :
    Inscription : Juillet 2009
    Messages : 2 415
    Points : 5 806
    Points
    5 806
    Par défaut
    Le sujet a été amplement enrichi par les différents avis et ce en passant du gros dinosaure MainFrame jusqu'à l'infinitésimal quark, anti-quarks et squark(en microphysique) qu'est le micro d'aujourd'hui.
    Ne pas oublier le tag si satisfait.
    Voter pour toute réponse satisfaisante avec pour encourager les intervenants.
    Balises CODE indispensables. Regardez ICI
    Toujours utiliser la clause Option Explicit(VBx, VBS ou VBA) et Ne jamais typer variables et/ou fonctions en VBS.
    Vous pouvez consulter mes contributions
    Ne pas oublier de consulter les différentes FAQs et les Cours/Tutoriels VB6/VBScript
    Ne pas oublier L'Aide VBScript et MSDN VB6 Fr

  20. #20
    Expert confirmé

    Inscrit en
    Août 2006
    Messages
    3 941
    Détails du profil
    Informations forums :
    Inscription : Août 2006
    Messages : 3 941
    Points : 5 652
    Points
    5 652
    Par défaut
    Wia,

    Effectivement.
    Si les cons volaient, il ferait nuit à midi.

Discussions similaires

  1. Afficher deux courbes les unes après les autres
    Par gmachi10 dans le forum Interfaces Graphiques
    Réponses: 3
    Dernier message: 09/07/2008, 10h49
  2. Réponses: 9
    Dernier message: 24/01/2008, 13h53
  3. Réponses: 32
    Dernier message: 28/08/2007, 20h57
  4. [Débutant] Charger et afficher des images les unes apres les autres
    Par kharon dans le forum Général JavaScript
    Réponses: 5
    Dernier message: 29/03/2007, 09h51
  5. Ouvrir plusieurs boites de dialogues les unes après les autres
    Par troumad dans le forum GTK+ avec C & C++
    Réponses: 4
    Dernier message: 25/02/2007, 12h55

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