Var a,b:integer;d: real;
Begin
Writeln(a,b);
Readln(a,b);
d:=a+b;
If d mod 2=0 then d:=a*b else d:=a/b;
Writeln(a=a);
End.

skillvip    1   25.04.2020 18:11    0