var
a,b:real;
begin
writeln ('Ââåäèòå ÷èñëà a è b');
readln (a,b);
if a>b then writeln ('Summa=',a+b) else
if a<b then writeln ('Proizvedenie=',a*b) else 
if a=b then writeln ('ERROR');
end.
