voila je viens de commancer de programmer et j´essaye de faire un petit " programmme" mais je trouve pas l´erreur! alors si qq1 pouvait m´aider. c´est un prgramme qui demande une somme si elle est supérieur a 100 ca écrit merci autrement ca écrit oublie. voila le prgramme:

program essai;
var;
x.integer;
begin;
write ( ´combien?´);
if x<100
then;
begin;
write ( ´oublie´);
end
else write ( ´merci´);
end.

euh je ne connais pas le pascal mais je vois pas l´instruction qui permet au programme de récupérer la valeur saisit par l´utilisateur. Comment le programme récupère x en gros ?

ah merci, maintenant je vois ce que j´ai fait de faux, je viens de commancer a programmer ca fait 2 jours alors voila koi... en faite je devais mettre " read ( x)" avant if, en fin je crois

en faite c´était encore une autre faute!!! y me marque: Syntax error, THEN expected but ; found

alors ya qq1 qui pourrait m´aider?

faut pas mettre de point ; après le then sinon ca marque la fin de l´instruction. Enlève ce ;

merci, maintenant il ne trouve plus de faute, mais quand je le lance, ca écrit comme je voulais:combien, j´entre un nombre mais dès que je fait enter il s´arrete!!! je vous remet le prog.

program essai;
var
x:integer;
begin;
write(´combien?´);
read(x);
if x<100
then
begin;
write ( ´oublie´);
end
else write ( ´merci´)
end.

Cool c´est bon alors.

non en faite le prgramme se lance, ca écrit " combien" après je tape un nombre, et quande je veux valider le nombre avec la touche enter, le prgramme s´arrete, en faite la fenetre se ferme!!! regarde le prog au-dessus

tu encadre tou dan une boucle while ^^

après 2 jours de recherche j´ai tjs pas trouvé mon prob!!! le programme fonctionne comme c´est écrit(heureusement), mais le problème c´est que, j´entre ma valeur je valide et il marque la réponse pendant un milième de seconde(tjs normal) mais comment je dois faire pour qu´il me l´écrive jusqu´a ce que je quitte???

voila mon programme, si je dois rajouter qqch préciser ou autrement je suis pomé!!!

program essai;
var
x:integer;
i:integer;
begin
writeln(´combien?´);
read(x);
if x<100
then
begin
writeln ( ´oui´);
end
else writeln ( ´non´);
end.

merci

et puis comment on fait pour dire que si x est négatif écrtit...

if x=???

Si x est inférieur à 0, alors c´est que x est un nombre négatif
if x < 0

Salut reevolt,

PROGRAM essai;
VAR nbr:INTEGER;
BEGIN
WRITELN(´Combien ? ´);
READLN(nbr);
IF nbr > 100 THEN WRITELN(´Merci´);
ELSE WRITELN(´Oublies´);
READLN; {* Pause *}
END.

jarose Je vais me permettre de faire une petite correction à ton programme, il y a un " ;" de trop après WRITELN(´Merci´) sinon il va y avoir une erreur sur la ligne où est écrit le ELSE du genre " Syntax error, ELSE found but IF missing".
En fait, " if < condition> then < instruction(s)> else < instruction(s)> ; " correspond à une seule et même instruction, qu´elle soit écrite en une ligne ou en plusieurs. le " ;" sert à définir la fin d´une instruction. Dans l´absolu on pourrait écrire une lettre par ligne.

Donc pour que celà fonctionne il faut écrire ton programme comme ceci :

Program Essai;
Var
Nbre : Integer;
Begin
Write(´Combien ? ´);
ReadLn(Nbre);
If ( Nbre>100) Then
WriteLn(´Thanks ! ´)
Else
WriteLn(´Forget ! ´);
ReadLn; {* Pause *}
End.

l´indentation n´est pas obligatoire, mais c´est plus lisible !

Je parle d´indentation, mais à l´affichage de mon post il supprime les espaces de début de ligne.

merci pour tous ceux qui m´on aider, la commande que je cherchai c´était {*pause*}, mais encore une autre question, est-ce que du delphi est du pascal??? ou c´est presque la meme chose, lequel est mieux?? merci pour les réponses

Yoda_Software: Effectivement, j´avais complétement oublié ce principe en pascal. Oui pour indenter du code, c´est pas le forum approprié :-/

reevolt: {* Pause *} est un commentaire, c´est ReadLn qui fait la " pause".
Delphi utilise le pascal objet oui, et il apporte une grande facilité dans le devellopement d´interface graphique, même si l´API win32 est utilisable.

Reevolt Va lire les posts que j´ai fait dernièrement dans le topic " Turbo Pascal", j´y explique tout au sujet du Pascal et de Delphi.