مساعدة في كتابة خوارزمية

[Morphus007]

Non mon algorithme est juste mais il donne comme resultat les 3 nombre les plus grand , et pour avoir les 3 nombre les plus petit il fait inverse symbole de comparaison.
et concernant comparaison avec 0 est pas obligatoire paeceque les nombre negatives sont des nombre entiers
Voici la solution juste a 100%
algo
var a,b,c,d,max : Entier;
debut
lire(a,b,c,d);
max:=a;
si a <b alors
max:=b;
si max<c alors
max:=c;
si max<d alors
max:=d;
si max<> a alors ecrire(a);
si max<> b alors ecrire(b);
si max<> d alors ecrire(d);
si max<> c alors ecrire(c);
fin