कंप्यूटर प्रोग्रामिंग/फ़ाइलें/स्यूडोकोड
दिखावट
files.txt
[सम्पादित करें | स्रोत सम्पादित करें]मुख्य
[सम्पादित करें | स्रोत सम्पादित करें]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
[सम्पादित करें | स्रोत सम्पादित करें]Declare Integer C
Declare Real F
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
[सम्पादित करें | स्रोत सम्पादित करें]Declare String Line
Open Filename
While Not EOF(Filename)
Input Line
Display Line
End While
Close Filename
AppendFile
[सम्पादित करें | स्रोत सम्पादित करें]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
[सम्पादित करें | स्रोत सम्पादित करें]Delete Filename