Pascal

Modified: Wednesday, 22-12-2021 07:00 AM

Đội Tennis cần tuyển một số vận động viên với điều kiện:

Số người thuận tay phải (R) bằng với số người thuận tay trái (L)
Nếu người thuận 2 tay (A) chỉ được chơi tay trái hoặc tay phải.

Dữ liệu vào: L R A

Dữ liệu ra: Tổng số vận động viên tối đa tuyển được

Dữ liệu vào	Dữ liệu ra
1 4 2	6
5 5 5	14
0 2 0	0

var l,r,a:byte;
m:byte;
begin
    readln(l,r,a);
    while (a > 0) and (l <> r) do 
    begin
        if l < r then
        begin
            a := a-1;
            l := l+1;
        end;
        if r < l then
        begin
            a := a-1;
            r := r+1;
        end;
    end;
    if a <> 0 then
    begin
        l := l+(a div 2);
        r := l;
    end;
    
    if l <= r then m:=l else m:=r;
        write(m*2);
    readln;
end.