program traingle; var x,y,z,u,v,a,b,c,d,e,f,g,h,i,j:integer; begin writeln('introduisez cinq nombres entiers:'); readln(x,y,z,u,v); c:=(x-y-z) div 2; a:=y+c; b:=z+c; i:=c-(y-u+z-v) div 2; h:=(y-u-i) div 2; j:=(z-v-i) div 2; d:=u+h; e:=i+h; f:=i+j; g:=j+v; writeln('donc on aura:'); writeln('a= ',a); writeln('b= ',b); writeln('c= ',c); writeln('d= ',d); writeln('e= ',e); writeln('f= ',f); writeln('g= ',g); writeln('h= ',h); writeln('i= ',i); writeln('j= ',j); writeln('Voici le traingle:'); writeln(x:18); writeln(a:15,b:6); writeln(y:12,c:6,z:6); writeln(d:9,e:6,f:6,g:6); writeln(u:6,h:6,i:6,j:6,v:6); end.