Anonymous user
Euler method: Difference between revisions
→{{header|Pascal}}: tabs/spacing correction in code
(New example - Pascal/Delphi) |
(→{{header|Pascal}}: tabs/spacing correction in code) |
||
Line 1,085:
CONST TR : REAL = 20.0;
CONST k : REAL = 0.07;
CONST time : INTEGER = 100;
CONST step : INTEGER = 10;
CONST dt : ARRAY[0..3] of REAL = (1.0,2.0,5.0,10.0);
VAR
FUNCTION NewtonCooling(t: REAL) : REAL;
Line 1,140:
</pre>
=={{header|Perl}}==
| |||