j'ai un autre problème dans un autre énoncé:
Ecrire un algo et sa traduction en pascal qui permet de:
- afficher un message"entier pair" et calculer le carré de l'entier si l'entier donnée par l'utilisateur est paire.
- Afficher un message"entier impaire" et calculer la racine carré de l'entier si l'entier donnée par l'utilisateur est impair

Pascal ( mon travail)
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Program p1;
uses wincrt;
var x:integer;
begin
writeln('donner la valeur de x');
readln(x);
if(x est pair) then begin
                    write('x est pair')
                    write('le carré de x est',sqr(x)');
                    end
               else begin
                    write('x est impair');
                    write('le racine carré de x est',sqrt(x)');
                    end;
l'erreur est affiché en if...' expression boleenne attendue'

Pouvez vous m'aider??
Ne dites pas que je suis idiote, il y a des prog que j'ai réussi quand meme