Source :Prologin, QCM 2003

Tâche : On vous donne trois nombres entiers non nuls. Ecrire un programme qui détermine si l'un d'eux est égal à la somme des deux autres. La fonction renvoie ce nombre s'il existe, 0 sinon.

Exemple :

• Entrée1 : x=18, y=42, z=24
• Sortie1 : 42

• Entrée2 : a=11, b=37, c=18
• Sortie2 : 0

Correction Problème : Les 3 nombres

Par : Ahmed Fessi

Pascal :

program The3Numbers;
uses wincrt;
var
	x,y,z:integer;
begin
	writeln('Donner 3 entiers');
	readln(x,y,z);
	if x+y=z then writeln(z) else
	if x+z=y then writeln(y) else
	if y+z=x then writeln(x) else
	writeln(0);
end.