diff --git a/Sonderuebung/WiSe24-25/SU03_2024_11_05_IF_DO/05_triples.f95 b/Sonderuebung/WiSe24-25/SU03_2024_11_05_IF_DO/05_triples.f95 index a20208ad1d91c2ecaeb5c33b908939b918413fab..3511849b4e23edc56e2dd3bbff9bc392d037b954 100644 --- a/Sonderuebung/WiSe24-25/SU03_2024_11_05_IF_DO/05_triples.f95 +++ b/Sonderuebung/WiSe24-25/SU03_2024_11_05_IF_DO/05_triples.f95 @@ -6,8 +6,8 @@ program tripel WRITE(*,*) "Folgende Tripel ergeben als Summe 50 :" DO i = 0, 50 - DO j = 0, 25 - DO k = 0, 16 + DO j = 0, 50 + DO k = 0, 50 IF (i+j+k == 50) WRITE(*,*) i, j, k END DO END DO