diff --git a/Sonderuebung/WiSe24-25/SU05_20204_11_19_Unterprogramme/03_taschenrechner_mit_funktionen.f95 b/Sonderuebung/WiSe24-25/SU05_20204_11_19_Unterprogramme/03_taschenrechner_mit_funktionen.f95 index 2a39df18080a264b65cfd6da82ebe30450cbbd1b..90a05ac724e655b51bb33a4fda143c31a24734a1 100644 --- a/Sonderuebung/WiSe24-25/SU05_20204_11_19_Unterprogramme/03_taschenrechner_mit_funktionen.f95 +++ b/Sonderuebung/WiSe24-25/SU05_20204_11_19_Unterprogramme/03_taschenrechner_mit_funktionen.f95 @@ -138,7 +138,7 @@ program taschenrechner function dreieckszahl(n) result(res) - integer :: n + integer, intent(in) :: n integer :: i integer :: res