// Exercice 1
programme heure
variables m, heure, min : entiers
constantes nuit = 0  // Début de la nuit
	   jour = 6  // Début du jour
	   soir = 18 // Début de la soirée
début heure
	lire (m);    // Entrée - nombre de minuits
		     // depuis la minuit
	heure <- m div 60;
	min <- m mod 60;
	afficher ("Il est ", heure, "h", min);

	si ((nuit <= heure) et (heure < jour)) 
	  alors // 0h00 - 5h59
		afficher ("C'est la nuit")
	  sinon // 6h00 - 23h59
		si ((jour <= heure) et (heure < soir)) 
		  alors afficher ("C'est le jour") // 6h00 - 17h59
		  sinon afficher ("C'est le soir") // 18h00 - 23h59
		finsi
	finsi
fin heure

// Exercice 2
programme triangle
variables a, b, c, somme : réels

fonction max2 (valeurs x, y : réels) resultat réel
début max2
	si (x < y)
	  alors retourner y
	  sinon retourner x
	finsi
fin max2

fonction max3 (valeurs x, y, z : réels) resultat réel
début max3
	retourner max2 (x, max2 (y, z));
fin max3

début triangle
	lire (a, b, c);
	somme <- a*a + b*b + c*c - 2*carré (max3 (a,b,c));

	// (a*a + b*b + c*c - carré (max3 (a,b,c))) -
	// c'est la somme de carrés de deux côtés les plus 
	// petits. Alors en enlevant encore une fois le 
	// carré du côté le plus grand, on obtient zero, si
	// le triangle est rectangle.

	si (somme = 0)
	  alors afficher ("Le triangle est rectangle")
	  sinon afficher ("Le triangle n'est pas rectangle")
	finsi
fin triangle