program Vidurkis;
var b, c, vid: real;
begin
  WriteLn('Hi! Stai cia tokia maza programele, kurioje gali surasti dvieju skaiciu vidurki. Spausk enter.');
  Readln;
  WriteLn('Parasyk pirmaji skaiciu ir spausk enter:');
  Readln(b);
  WriteLn('Parasyk antraji skaiciu ir spausk enter:');
  Readln(c);
  vid := (b+c)/2;
  WriteLn('Rezultatas: ',vid: 8: 2);
  Readln
end.