ma fenetre se ferme tt seule

Réponse acceptée !
Bonjour,
Ajoute un readln;
Avant le end.

Dom

Réponse acceptée !
Salut,

c'est parce que c'est une application console ...
il faut donc le gerer soit même.

ensuite quelle version de Delphi tu utilises ?
Il y a quand même quelques erreurs dans le code ( enfin pour compiler sous Delphi)

exemple :

program Project1;
 {$APPTYPE CONSOLE}


var  rep : Extended;

begin
   write ('saisissez le diametre de votre cercle et appuyez sur entrer') ;
   readln (rep) ;
   writeln (rep * pi) ;
   write ('appuyez sur entrer pour terminer') ;
   readln  ;
end.



 
@+
Cirec

---

 
@+
Cirec

---

Réponse acceptée !

Re, je suis desolé mais pour le writeln, le programme ne se fermerais pas, c'est mieux qu'avant mais ce que je voudrais vraiment c'est que ça reparte en redemandant un nouveau diametre, etc
Merci.
Godan 

Réponse acceptée !
Salut,

Je ferais quelque chose dans le genre :



program Cercle;

{$APPTYPE CONSOLE}

const
  Yes = ['o', 'O', 'y', 'Y'];

var
  Diam: Extended;
  OneMore: Char = 'o';

procedure Reset;
begin
  Write('Saisissez le diametre de votre cercle et appuyez sur entree : ');
  Readln(Diam);
  Writeln(Diam * Pi);
  Write('Un autre calcul ? (o/n) : ');
  Readln(OneMore);
end;

begin
  while OneMore in Yes do
    Reset;
end.

Moi, j'aime pas programmer en mode console...