RosettaCodeData/Task/Function-composition/ZX-Spectrum-Basic/function-composition-1.basic

5 lines
89 B
Plaintext

10 DEF FN f(x)=SQR x
20 DEF FN g(x)=ABS x
30 DEF FN c(x)=FN f(FN g(x))
40 PRINT FN c(-4)