proggen.org training:table
http://update.proggen.org/
2026-04-19T10:58:28+0200proggen.org
http://update.proggen.org/
http://update.proggen.org/lib/tpl/proggenY/images/favicon.icotext/html2022-09-22T19:39:26+0200Anonymous (anonymous@undisclosed.example.com)training:table:solution
http://update.proggen.org/doku.php?id=training:table:solution&rev=1663868366
Mögliche Lösungen um Funktionswerte in Tabellen ausgeben zu können
Fortran
program main
implicit none
call tabelle (-20, 20, 1);
end program
subroutine tabelle ( start, endw, step )
implicit none
integer start, endw, step
integer k
if (step .LT. 1) then
step = 1
endif
! Tabellenkopf
write (*,*) "+-------------------+"
write (*,*) "| x | y |"
write (*,*) "+-------------------+"
! x-y-Wertepaare ausgeben
do k=start, endw, step
write (*, …text/html2022-09-22T19:39:26+0200Anonymous (anonymous@undisclosed.example.com)training:table:start
http://update.proggen.org/doku.php?id=training:table:start&rev=1663868366
Funktionswerte in Tabellenform ausgeben
Gegeben sei die Funktion
<m>
f(x)=3x^2 + 4x + 3
</m>
Aufgabe
Geben Sie Funktionswerte von -20 <= x <= 20 für diese Funktion tabellarisch aus. Eine mögliche Tabelle könnte so aussehen:
x | y
-------------------
1 | y_1
...
20 | y_20