10 OPEN "SAMPLE.DAT" FOR OUTPUT AS #1
20 PRINT #1,USING"$$###.##";99.5:CLOSE#1
40 OPEN "SAMPLE.DAT" FOR INPUT AS#1
50 INPUT #1,A:PRINT"Первое значение в файле:";A:CLOSE#1