MS-DOS QBasic 1.0
CLS
a = 1: b = 4: h = .14
FOR x = a TO b STEP h
f = COS(x ^ 2) + x ^ 3 / SQR(x + 1)
PRINT x, f
NEXT x
Результат выполнения программы:
1 1.247409
1.14 1.280647
1.28 1.321321
1.42 1.409588
1.56 1.613091
1.7 2.021439
1.84 2.726152
1.98 3.78488
2.12 5.177972
2.26 6.778177
2.4 8.36335
2.54 9.695479
2.68 10.65637
2.82 11.37576
2.960001 12.24446
3.100001 13.72984
3.240001 16.04016
3.380001 18.86653
3.520001 21.49897
3.660001 23.38719
3.800001 24.74731
3.940001 26.5355