blob: 28c0e776181d385a81314ffc3d16126032ba23e6 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
Under main
set chararray name
set intarray age
set record counter to 0
input infile stream (open CH11 text file)
output outfile stream
if infile is open
recordcounter is the readdata function
infile close
if outfile is open
writeoutputfile function
printtotalandsummary function
outfile close
anything else
output trouble opening file, out/in file
output about to exit now
|