Recherche :

Electronique : Kr3st, 1 utilisateur anonyme et 12 utilisateurs inconnus

Mot : Pseudo : Filtrer
Page : 1 2 3 4 5 Page Suivante Page Précédente Bas de page
Auteur	Sujet : [examens] y'en a d'autres ici qui souffrent ?

Del Gro Badeu

Trop de bruit c'est le ...

Reprise du message précédent :
KnX vs batte de baseball school compliant : Round II

Google

Del Gro Badeu

Trop de bruit c'est le ...

ouaaaiiiisss math finies

note espérée 2/20 :'( enfin ptet pas aussi bas qd meme ... mais pas tres haut non plus

xstephx

Sarah!

algo fini... ben y'avait que un exercice donc soit il est juste, et g réussi mon exam et bye bye l'algo, soit il est faux et wlecome algo en juin :lol:

avec de la chance il est juste

---------------
Gagnez un iPhone en jouant sur www.findupays.be

Del Gro Badeu

Trop de bruit c'est le ...

soit 0 soit 20

xstephx

Sarah!

nan paske y'a de la théorie (20 % des points) et l'exercice de labo (en pascal lol) qui vaut pour 10 %

---------------
Gagnez un iPhone en jouant sur www.findupays.be

ParadoX

B l a c k M e t a l

Lundi, Analyse & Connaissance des Entreprises :sweat:

---------------
Hitman for real - TrueCrypt, the topic - Blog

Del Gro Badeu

Trop de bruit c'est le ...

aaaahhh le pakal, c'est comme l'oberon ( d'ailleur on se demande pk ils ont des noms différent ) ... d'la merde

[Attention : Ceci est du masochisme pur et dur]
Programme rendu au dernier TP, c'est pas un fake, les commentaires et les noms de variables sont bien d'origine ( ptet meme les bugs .. a 9h00 du mat on a pas toute sa tete )

Code :

(*
Attention :
Le programme génère une erreur quand le texte ne contient aucun mots ... flegmme de résoudre le bug mais c trois fois rien, une toute petite condition a rajoutée dans CompteMots :)
*)
MODULE Mouette;
(* Appel des modules externes nécessaires *)
IMPORT StdLog, ObxSaisir;
(* Déclaration des constantes *)
CONST NbMaxCasesTexte = 100;
CONST NbMaxMotsTexte = 50;
CONST NbMaxCasesMot = 20;
(* Déclaration des types *)
TYPE TABLEAU = ARRAY NbMaxCasesTexte OF CHAR;
TYPE TABLEAUMOT = ARRAY NbMaxMotsTexte OF ARRAY NbMaxCasesMot OF CHAR;
(* renvoie le nombre de caractère dans une chaîne stockée dans une variable type TABLEAU *)
PROCEDURE NbCar( VAR S : TABLEAU ) : INTEGER;
(* Déclaration des variables *)
VAR
Scan : INTEGER;
BEGIN
(* Test tant que le tableau ne contient pas de 0X *)
Scan := 0;
WHILE S[Scan] # 0X DO
INC(Scan);
END;
(* Renvoie l'id de la case possédant le premier 0X *)
RETURN Scan;
END NbCar;
(* transforme tous les caractères d'une chaine en majuscule *)
PROCEDURE Majuscules( VAR L : TABLEAU );
(* Déclaration des variables *)
VAR
progress : INTEGER;
BEGIN
(* On réutilise les données que peuvent renvoyer les autres procédures dans une boucle statique *)
(* On décale petit à petit la table ASCII vers les majuscules *)
FOR progress := 0 TO NbCar(L) DO
IF (( ORD(L[progress]) <= 122 ) & ( ORD(L[progress]) >= 97 )) THEN
L[progress] := (CHR(ORD(L[progress]) - 32 ));
END;
END;
END Majuscules;
(* Affiche tous les caractères *)
PROCEDURE Afficher( VAR L : TABLEAU );
(* Déclaration des variables *)
VAR
progress : INTEGER;
BEGIN
(* On réutilise les données que peuvent renvoyer les autres procédures dans une boucle statique *)
(* On décale petit à petit la table ASCII en affichant les caractères un à un *)
FOR progress := 0 TO NbCar(L) DO
StdLog.Char(L[progress]) ;
END;
END Afficher;
(* Renvoie TRUE si le caractère testé est une lettre, renvoie FALSE sinon *)
PROCEDURE EstLettre( caractere : CHAR ): BOOLEAN;
(* Déclaration des variables *)
VAR
MickeyMystere : BOOLEAN;
BEGIN
(* Test si le caractère est une majuscule, minuscule, chiffre *)
IF (( ORD(caractere) <= 57 ) & ( ORD(caractere) >= 48 )) OR (( ORD(caractere) <= 122 ) & ( ORD(caractere) >= 97 )) OR (( ORD(caractere) <= 90 ) & ( ORD(caractere) >= 65 )) THEN
MickeyMystere := TRUE;
ELSE
MickeyMystere := FALSE;
END;
(* Renvoie ce qui est attendue, cf : en-tete de procédure *)
RETURN MickeyMystere;
END EstLettre;
(* Cette procédure va trier le tableau ayant recu la chaine de caratère et ranger le tout dans le second tableau *)
PROCEDURE CompteMots( VAR S : TABLEAU ) : INTEGER;
(* Déclaration des variables *)
VAR
Scan : INTEGER; (* Permet de savoir a tout moment a quel case est rendu la procédure *)
Stop : INTEGER; (* Cette variabel stock le retour de NbCar *)
NbMots : INTEGER; (* Stock le nombre de mots comptés *)
BEGIN
(* Initialise les variables le nécessitant *)
NbMots := 0;
Stop := NbCar(S);
FOR Scan := 0 TO Stop DO
IF ( EstLettre(S[Scan]) = FALSE ) & ( EstLettre(S[Scan-1]) # EstLettre(S[Scan]) ) THEN
NbMots := NbMots +1;
END;
END;
RETURN NbMots;
END CompteMots;
PROCEDURE Test*();
VAR T : TABLEAU;
BEGIN
ObxSaisir.Chaine(T);
StdLog.Int(CompteMots(T));
END Test;
END Mouette.

xstephx

Sarah!

huhu

---------------
Gagnez un iPhone en jouant sur www.findupays.be

KnX

To be or not to code.

mais c'est quoi ce language de merde ?!

---------------
/!\ KnX's bash NP : Norah Jones - Don't Miss You At All /!\

xstephx

Sarah!

c sur que c autre chose que le mirc scripting hein

---------------
Gagnez un iPhone en jouant sur www.findupays.be

Del Gro Badeu

Trop de bruit c'est le ...

welcome to the real world [:grut]

c'est de l'oberon, un deriveée du pakal, mais alors ca c'est comme la théorie de darwin qui essaye de relier les hommes aux elephants au travers des dinosaures [:dslam]

c'est laid ... heiiiiiinnnn mais bon, j'aime bien mes doux nom de variable style myckeymystere ... ou mon module qui s'apelle mouette ... d'ailleur on m'a reprocher que le nom de module n'etait pas explicit :sarcastic: va savoir ...

xstephx

Sarah!

noms des vraibles pas explicites, c'est une remarque que j'ai déjà entendue...

---------------
Gagnez un iPhone en jouant sur www.findupays.be

Del Gro Badeu

Trop de bruit c'est le ...

c'est comme ca qu'on reconnait les génies
on est capable d'outrepasser le rapport terre à terre entre le nom d'une variable et le contenue d'une variable [:dslam]

xstephx

Sarah!

moi je fais ça pour entrainer ma mémoire du genre, la variable s'apelle $sqdjgcezhg (touches aléatoire au clavier) et l'autre s'appelle $ezheu... hihi

---------------
Gagnez un iPhone en jouant sur www.findupays.be

Del Gro Badeu

Trop de bruit c'est le ...

fumiste :lol:

Vesta

Encore encore et encore

Plus qu'un demain aprem et j'ai fini YESSSS
(enfin quoique je reverai certains profs en septembre :sarcastic: )

nicodache

moi chuis en vacances depuis mardi 16h

---------------
modérateur inside plankaivoo [:nicodache]

- ici powered - Je roule en micra 1l 55cv et je t'emmerde

xstephx

Sarah!

plus qu'un demain matin... algèbre... et c le mm prof que pour analyse des exemples d'exams ici : http://www.ulg.ac.be/mathgen/cours [...] _exam.html [:jayz]

---------------
Gagnez un iPhone en jouant sur www.findupays.be

bap2703

Demain aprem : TP physique

Y me faut 4/20 pour avoir mon UV, j'espère que je les aurait :lol:

xstephx

Sarah!

si t'as 4/20 t'as un néon uv ??? [:grut]

---------------
Gagnez un iPhone en jouant sur www.findupays.be

bap2703

Nan UV = unité de valeur

24 dans l'année. Si t'en as pas 20 tu passes pas
Pour les trouver faut avoir 10/20, mais elles sont bien cachées les connes

Del Gro Badeu

Trop de bruit c'est le ...

premiers résultats ... premières analyses ...

a savoir que :
1 mes copie d'algo ne sont pas anonymiser
2 je me suis fait corriger par un connard de doctorant
3 qu'il ne me blaire pas
4 que je le blaire pas
5 <- le nombre de points qu'il m'a enlever sans raison s't'enculé !!!! :fou: ptain et je dois attendre x temps pour me faire réévaluer ma copie

bilan des course 14.3 alors que je devrais avoir au alentours de 19 :fou:

et en plus il me file pas son cours sous pretexte que je suis arrivé en retard dans l'amphi, genre les amphis c'est obligatoire .... :sarcastic:

Google

Page : 1 2 3 4 5

Page Suivante

Page Précédente

Haut de page

FORUM Syndrome-OC - Jacky-PC

FORUM Syndrome-OC - Jacky-PC

Le salon de discussion

Société

[examens] y'en a d'autres ici qui souffrent ?

[examens] y'en a d'autres ici qui souffrent ?

FORUM Syndrome-OC - Jacky-PC

Le salon de discussion

Société

[examens] y'en a d'autres ici qui souffrent ?