RosettaCodeData/Task/Negative-base-numbers/F-Sharp/negative-base-numbers-2.fs
2023-07-01 13:44:08 -04:00

3 lines
203 B
FSharp

let t0,t146,t10,t15=D2N -13 0,D2N -3 146,D2N -2 10,D2N -10 15
Seq.iter(fun n->Seq.iter(printf "%d ")n; printfn "")[t0;t146;t10;t15]
Seq.iter(printfn "%d ")[N2D -13 t0;N2D -3 t146;N2D -2 t10;N2D -10 t15]