Anonymous user
Numerical integration: Difference between revisions
→{{header|REXX}}: added a missing statement.
(→{{header|REXX}}: added a missing statement.) |
|||
Line 4,252:
trapezium: procedure expose test; parse arg a,b,n; h=(b-a)/n
$= 0
do x=a by h for n; $=$+(f(x)+f(x+h)); end /*x*/
return $*h/2</lang>
{{out|output|text= when using the default inputs:}}
<pre>
| |||