Файлы последовательного доступа

Занятие 37. Файлы последовательного и произвольного доступа.

Занятие 36. Лабораторная работа №10. Массивы символьных переменных

End Sub

Next i

Rem Вывод результата

Print

Next i

Next j

End If

Rem Сортировка двух массивов

Next i

Rem Вывод исходных данных

Rem Ввод данных

Private Sub Command1_Click()

Занятие 35.Массивы символьных величин

Занятие 34. Лабораторная работа №9. Двухмерные массивы

Задача. Пусть имеется финишный протокол забега на дистанцию 100 метров.

Требуется получить протокол распределения мест занятых участниками

Решение. Присваиваем каждому элементу массива Fam и T соответствующие значения.

Dim Fam$(5), T(5)

Fam$(1)=”Иванов”: T(1)=10.6

Fam$(2)=”Алексеев”: T(1)=10.4

Fam$(3)=”Аистов”: T(1)=10.1

Fam$(4)=”Макаров”: T(1)=10.5

Fam$(5)=”Колесов”: T(1)=10.25

? "Номер", "Фамилия", "Время"

For i = 1 To 5

? i, Fam$(i), T(i)

For i = 1 To 4

For j = 1 To 4

If T(j) > T(j + 1) Then

temp1 = T(j)

T(j) = T(j + 1)

T(j + 1) = temp1

temp2 = Fam$(j)

Fam$(j)= Fam$(j + 1)

Fam$(j + 1) = temp2

Print "Место", "Фамилия", "Время"

For i = 1 To 5

? i, ? Fam$(i), ? T(i)

Исходные данные для больших программ удобно хранить в виде отдельных файлов. Тогда при запуске программ не надо будет каждый раз вводить эти данные, а при получении результата мы сможем сохранять данные в файловом виде и делать с ними что хотим.

Мы будем работать с файлами последовательного и произвольного доступа.

Файлы последовательного доступа – можно сравнить с музыкальными записями на аудиокассете – для поиска нужной песни приходится перематывать кассету и последовательно ее прослушивать. Зато эти файлы очень просты, записываются в виде простого текстового файла и могут обрабатываться любым текстовым редактором.

Операторы, предназначенные для работы с файлами последовательного доступа позволяют: