Update 03_taschenrechner_mit_funktionen.f95

0535b182 · dali662d · a7ad89ac · 0535b182
Commit 0535b182 authored 4 months ago by dali662d
--- 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