Numerical integration: Difference between revisions
m
→{{header|BASIC}}: corrected the error
(Added Elixir) |
m (→{{header|BASIC}}: corrected the error) |
||
Line 398:
=={{header|BASIC}}==
{{works with|QuickBasic|4.5}}
{{trans|Java}}
<lang qbasic>FUNCTION leftRect(a, b, n)
h = (b - a) / n
Line 423 ⟶ 421:
h = (b - a) / n
sum = 0
FOR x = a + h / 2 TO b - h / 2 STEP h
sum = sum +
NEXT x
midRect = sum
Line 444 ⟶ 442:
FOR i = 0 TO n-1
sum1 =
NEXT i
|