1def calculate_raisin_toxicity(dog_weight, raisin_quantity):
2    """
3    犬の体重とレーズンの量に基づいて毒性レベルを計算する。
4    
5    引数:
6        dog_weight (float): 犬の体重（kg）
7        raisin_quantity (float): 摂取したレーズンの量（グラム）
8        
9    戻り値:
10        dict: 比率、毒性レベル、推奨を含む辞書
11    """
12    # 無効な入力を処理する
13    weight = float(dog_weight) if float(dog_weight) > 0 else 0
14    raisins = float(raisin_quantity) if float(raisin_quantity) >= 0 else 0
15    
16    # 比率（g/kg）を計算する
17    ratio = raisins / weight if weight > 0 else 0
18    
19    # 毒性レベルを決定する
20    if ratio == 0:
21        toxicity_level = "なし"
22        recommendation = "行動は必要ありません。"
23    elif ratio < 2.8:
24        toxicity_level = "軽度"
25        recommendation = "犬を監視し、獣医に連絡を検討してください。"
26    elif ratio < 5.6:
27        toxicity_level = "中程度"
28        recommendation = "直ちに獣医に連絡してください。"
29    elif ratio < 11.1:
30        toxicity_level = "重度"
31        recommendation = "緊急の獣医療が必要です。"
32    else:
33        toxicity_level = "致命的"
34        recommendation = "緊急：直ちに緊急の獣医療を求めてください。これは命に関わる可能性があります。"
35    
36    return {
37        "ratio": f"{ratio:.2f}",
38        "toxicity_level": toxicity_level,
39        "recommendation": recommendation
40    }
41
42# 使用例
43dog_weight = 15  # kg
44raisin_amount = 60  # グラム
45result = calculate_raisin_toxicity(dog_weight, raisin_amount)
46print(f"毒性比率: {result['ratio']} g/kg")
47print(f"リスクレベル: {result['toxicity_level']}")
48print(f"推奨: {result['recommendation']}")
49

1public class RaisinToxicityCalculator {
2    public static class ToxicityResult {
3        private final double ratio;
4        private final String toxicityLevel;
5        private final String recommendation;
6        
7        public ToxicityResult(double ratio, String toxicityLevel, String recommendation) {
8            this.ratio = ratio;
9            this.toxicityLevel = toxicityLevel;
10            this.recommendation = recommendation;
11        }
12        
13        public double getRatio() { return ratio; }
14        public String getToxicityLevel() { return toxicityLevel; }
15        public String getRecommendation() { return recommendation; }
16    }
17    
18    public static ToxicityResult calculateToxicity(double dogWeight, double raisinQuantity) {
19        // 無効な入力を処理する
20        double weight = dogWeight > 0 ? dogWeight : 0;
21        double raisins = raisinQuantity >= 0 ? raisinQuantity : 0;
22        
23        // 比率（g/kg）を計算する
24        double ratio = weight > 0 ? raisins / weight : 0;
25        
26        // 毒性レベルを決定する
27        String toxicityLevel;
28        String recommendation;
29        
30        if (ratio == 0) {
31            toxicityLevel = "なし";
32            recommendation = "行動は必要ありません。";
33        } else if (ratio < 2.8) {
34            toxicityLevel = "軽度";
35            recommendation = "犬を監視し、獣医に連絡を検討してください。";
36        } else if (ratio < 5.6) {
37            toxicityLevel = "中程度";
38            recommendation = "直ちに獣医に連絡してください。";
39        } else if (ratio < 11.1) {
40            toxicityLevel = "重度";
41            recommendation = "緊急の獣医療が必要です。";
42        } else {
43            toxicityLevel = "致命的";
44            recommendation = "緊急：直ちに緊急の獣医療を求めてください。これは命に関わる可能性があります。";
45        }
46        
47        return new ToxicityResult(ratio, toxicityLevel, recommendation);
48    }
49    
50    public static void main(String[] args) {
51        double dogWeight = 20.0; // kg
52        double raisinAmount = 100.0; // グラム
53        
54        ToxicityResult result = calculateToxicity(dogWeight, raisinAmount);
55        
56        System.out.printf("毒性比率: %.2f g/kg%n", result.getRatio());
57        System.out.println("リスクレベル: " + result.getToxicityLevel());
58        System.out.println("推奨: " + result.getRecommendation());
59    }
60}
61

1<?php
2function calculateRaisinToxicity($dogWeight, $raisinQuantity) {
3    // 無効な入力を処理する
4    $weight = floatval($dogWeight) > 0 ? floatval($dogWeight) : 0;
5    $raisins = floatval($raisinQuantity) >= 0 ? floatval($raisinQuantity) : 0;
6    
7    // 比率（g/kg）を計算する
8    $ratio = $weight > 0 ? $raisins / $weight : 0;
9    
10    // 毒性レベルを決定する
11    $toxicityLevel = '';
12    $recommendation = '';
13    
14    if ($ratio == 0) {
15        $toxicityLevel = "なし";
16        $recommendation = "行動は必要ありません。";
17    } elseif ($ratio < 2.8) {
18        $toxicityLevel = "軽度";
19        $recommendation = "犬を監視し、獣医に連絡を検討してください。";
20    } elseif ($ratio < 5.6) {
21        $toxicityLevel = "中程度";
22        $recommendation = "直ちに獣医に連絡してください。";
23    } elseif ($ratio < 11.1) {
24        $toxicityLevel = "重度";
25        $recommendation = "緊急の獣医療が必要です。";
26    } else {
27        $toxicityLevel = "致命的";
28        $recommendation = "緊急：直ちに緊急の獣医療を求めてください。これは命に関わる可能性があります。";
29    }
30    
31    return [
32        'ratio' => number_format($ratio, 2),
33        'toxicityLevel' => $toxicityLevel,
34        'recommendation' => $recommendation
35    ];
36}
37
38// 使用例
39$dogWeight = 8; // kg
40$raisinAmount = 30; // グラム
41
42$result = calculateRaisinToxicity($dogWeight, $raisinAmount);
43echo "毒性比率: {$result['ratio']} g/kg\n";
44echo "リスクレベル: {$result['toxicityLevel']}\n";
45echo "推奨: {$result['recommendation']}\n";
46?>
47

1' Excel VBA関数：レーズン毒性計算
2Function CalculateRaisinToxicity(dogWeight As Double, raisinQuantity As Double) As String
3    Dim ratio As Double
4    Dim toxicityLevel As String
5    Dim recommendation As String
6    
7    ' 無効な入力を処理する
8    If dogWeight <= 0 Then
9        dogWeight = 0
10    End If
11    
12    If raisinQuantity < 0 Then
13        raisinQuantity = 0
14    End If
15    
16    ' 比率（g/kg）を計算する
17    If dogWeight > 0 Then
18        ratio = raisinQuantity / dogWeight
19    Else
20        ratio = 0
21    End If
22    
23    ' 毒性レベルを決定する
24    If ratio = 0 Then
25        toxicityLevel = "なし"
26        recommendation = "行動は必要ありません。"
27    ElseIf ratio < 2.8 Then
28        toxicityLevel = "軽度"
29        recommendation = "犬を監視し、獣医に連絡を検討してください。"
30    ElseIf ratio < 5.6 Then
31        toxicityLevel = "中程度"
32        recommendation = "直ちに獣医に連絡してください。"
33    ElseIf ratio < 11.1 Then
34        toxicityLevel = "重度"
35        recommendation = "緊急の獣医療が必要です。"
36    Else
37        toxicityLevel = "致命的"
38        recommendation = "緊急：直ちに緊急の獣医療を求めてください。これは命に関わる可能性があります。"
39    End If
40    
41    ' 結果をフォーマットする
42    CalculateRaisinToxicity = "比率: " & Format(ratio, "0.00") & " g/kg" & vbCrLf & _
43                             "リスクレベル: " & toxicityLevel & vbCrLf & _
44                             "推奨: " & recommendation
45End Function
46
47' セルでの使用法: =CalculateRaisinToxicity(15, 45)
48