Salut tout le monde,
j'ai un problème avec 2 exercices.

Voilà l'énoncé du premier
Ecrire un programme qui permet de saisir le jour de la semaine puis afficher le lendemain
Voilà l'essai que j'ai fait
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 exercice ;
 
uses wincrt ;
 
var
    semaine:(lundi,mardi,mercredi,jeudi,vendredi,samedi,dimanche);
    a,b : string ;
 
begin
    writeln('ecrire un jour de la semaine');
    readln(a);
    writeln('le lendemain de ',a,' est: ',succ(a)); { l'erreur:ordinal expression expected }
 
end.
Pour le 2 ème exercice, il faut utiliser les fonction length et delete. Voilà l'énoncé de l'exercice
Saisir un verbe de premier groupe puis le conjuger et l'afficher avec le 1er personne du pluriel au present
Voilà l'essai
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
program exercice1 ;
 
uses wincrt ;
 
var
l: integer ;
v,vs : string ;    
 
begin
    writeln('ecrire un verbe de 1er groupe');
    readln(v);
    l:=length(v) ;
    vs:=delete(v,l-1,2) ; 
    writeln('nous',v,'ons');
 
end.
Comme vous voyez je ne sais pas comment resoudre les 2 exercices malgré les deux essais que j'ai fait - c'est ça quand on est newbie

Merci