Programming Fundamentals/Files/Pseudocode

files.txt

edit

Main

edit
Declare String Filename
    
Set Filename = "~file.txt"
If FileExists(Filename) Then
    Display "File already exists."
Else
    Call CreateFile(Filename)
    Call ReadFile(Filename)
    Call AppendFile(Filename)
    Call ReadFile(Filename)
    Call DeleteFile(Filename)
End If

CreateFile

edit
Declare Integer C <- 0
Declare Real F <- 0

Open Filename
Display "C   F"
For C = 0 To 50
    Set F = C * 9.0 / 5 + 32
    Display C, "   ", F
End For

Close Filename

ReadFile

edit
Declare String Line

Open Filename
While Not EOF(Filename)
    Input Line
    Display Line
End While

Close Filename

AppendFile

edit
Declare Integer C
Declare Real F

Open Filename
For C = 51 To 100
    Set F = C * 9.0 / 5 + 32
    Display C, "   ", F
End For

Close Filename

DeleteFile

edit
Delete Filename

See Also

edit