Discussion :

[doukk]

bonjour a tous je suis étudiant en IUT informatique a Montpellier et j'ai un problème pour afficher un booléen existe t'il un package deja crée qui permettrait de l'afficher ? d'avance merci

[Blackknight]

As-tu bien cherché ?
Je vais te donner deux éléments de réponse :

• Une explication des types prédéfinis
• le chapitre Input-Output for Enumeration Types dans l'ARM

ARM : Ada Reference Manual

Pour info, rien qu'avec ces deux sites, tu as pratiquement toutes les réponses à toutes tes questions présentes et futures :-)

[Invité]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
with text_io;
procedure Print(B : in boolean) is
begin
   text_io.put(boolean'image(b));
end print;

[Blackknight]

Bon, si on décide de lui filer les réponses, allons-y.
Autre solution plus orientée type énuméré :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
with Ada.Text_IO; use Ada.Text_IO;
 
procedure TestBooleen is
 
   package booleen_IO is new Ada.Text_IO.Enumeration_IO(Boolean);
 
   Mon_Bool : Boolean := True;
 
begin
   Put("Valeur ? : ");
   booleen_IO.Put(Mon_Bool);
   New_Line;
end;

Ca mache quand même le boulot tout ça...