program tr1angl3; var a,b,c,d,e,f,g,h,i,j,u,v,x,y,z:integer; begin Write('Entrez x:'); Read (x); Write('Entrez y:'); read (y); Write('Entrez z:'); read (z); Write('Entrez u:'); read (u); Write('Entrez v:'); read (v); c := ((x-y-z)div 2); a := ((y+x-z)div 2); b := ((z+x-y)div 2); h := ((y-u+i)div 2); i := ((c-h-j)div 2); j := ((z-i-v)div 2); d := (h+u); e := h+i; f := i+j; g := j+v; writeLN(' ',x); writeLN(' ',a,' ',b); writeLN(' ',y, ' ',c ,' ',z); writeLN(' ',d, ' ',e , ' ',f , ' ',g); writeLN(' ',u ,' ',h ,' ',i ,' ',j, ' ', v); writeLN(' by_m3hd1'); End.