program Bevarde; var a, b : integer; begin WriteLn('Iveskite du sckaicius'); Read(a,b); WriteLn('Atsakymas:', a div 2, ' ', b div 2); Readln; end.