program Project1; {$APPTYPE CONSOLE} var f1,f2:text; t1,m1,c1,t2,m2,c2:integer; begin assign(f1,'Input.dat');reset(f1); read(f1,t1,m1,c1,t2,m2,c2); assign(f2,'Output.sol');rewrite(f2); if (t1<=t2) and (m1<=m2) and (c1<=c2) then else writeln(f2,'Ne korektni dani'); if t1=t2 then else t1:=t2-t1; if m1=m2 then else m1:=m2-m1; if c1=c2 then else c1:=c2-c1; writeln(f2,t1,' ',m1,' ',c1); close(f1);close(f2); end.