RosettaCodeData/Task/Write-float-arrays-to-a-text-file/Delphi/write-float-arrays-to-a-text-file-3.pas

.header off
.mode list
.output output.tsv
select format('{:.3f}', x) || chr(9) || format('{:.5f}', y) from t;
.output
.shell cat output.tsv