Лабораторные / Лаб_1 / Вар_12 / test1b

program test1b;
var
	x,i,j:integer;
	a,b:boolean;
begin
	readln(i,j);
	if (i=0) then a:=false;
	if (j>0) and (j<=9) then a:=true;
	if a then b:=true else b:=false;
	if a or b then x:=0;
	if not b then
			if j mod 2=0 then x:=j div 2
	else x:=j;
	if i>1 then
		begin
			i:=i-1; x:=i;
		end
	else x:=j;
	writeln(x);
end.