'for'

program if44;

uses crt;
var a,b,c,s,k:integer;sa:real;
BEGIN
read(a,b,c);s:=0;k:=0;sa:=0;
if a mod 2=0 then begin s:=s+a;k:=k+1;end;
if b mod 2=0 then begin s:=s+b;k:=k+1;end;
if c mod 2=0 then begin s:=s+c;k:=k+1;end;
if k<>0 then sa:=s/k;
writeln(sa:1:2);


END.

program pk87;

uses crt;
var x,y:real;
BEGIN
read(x,y);
if x<y then x:=x+1 else begin x:=x*10;y:=y*10;end;
writeln(x:1:2,'',y:1:2);


END.

program jfhjdhy;

uses crt;
var x,y,z:real;
BEGIN
read(x,y);z:=x;
if x<y then begin x:=x+y;y:=y*z;end else begin x:=x*y;y:=y+z;end;
writeln(x:1:2,'',y:1:2);

END.
Var a,b,c,d,x1,x2:real;
 begin
 read(a,b,c); d:=b*b-4*a*c;
 if d<0 then writeln('коренів немає')
 else
 begin
 x1:=(-b+sqrt(d))/(2*a);
 x2:=(-b-sqrt(d))/(2*a);
 writeln(x1:1:2,' ',x2:1:2);
 end
 end.