谁帮我下，我这会晕了！帮我写个逻辑语句，谢谢！

Question

CMzfd:Double; //门诊封顶
CMxbfd:Double;//慢性病封顶
fMzyb:Double;//门诊已报
fMxbYb:Double;//慢性病已报
temp:Double;本此报销
门诊封顶比慢性病封顶要低
要求：门诊报销不能超过门诊封顶，慢性病不能超过封顶，但门诊报销加慢性病报销不能超过慢性病封顶。
用if语句帮我写一下吧！谢谢了！在线等！

Answer 1

function CheckValid(iBXLX: Integer;  CMzfd, CMxbfd, fMzyb, fMxbYb, temp:Double): Boolean;
begin
  Result := True;
  if iBXLX = 1 then  //门诊报销
  begin
    if temp + fMzyb > CMzfd then Result := False
  end
  else begin
    if temp + fMxbYb > CMxbfd then Result := False
  end;
  if temp + fMzyb + fMxbyb > CMxbfd then Result := False
end;