| Цитата | В алгоритме, предусмотренного американским национальным стандартом NAVSO P-5239-26 для MFM-кодируемых устройств в первом цикле записывается #01, во втором — #7FFFFFF, в третьем — последовательность псевдослучайных чисел
|
| Код | Dim filetodel As String = path Dim fs As FileStream Dim rnd As New Random(Byte.MaxValue) 'Проход 1 fs = New FileStream(filetodel, FileMode.Open) For i As Integer = 0 To fs.Length - 1 fs.WriteByte(CByte(CByte(1)) Next fs.Close() 'Проход 2
'Проход 3 fs = New FileStream(filetodel, FileMode.Open) For i As Integer = 0 To fs.Length - 1 fs.WriteByte(CByte(rnd.[Next]())) Next fs.Close()
|
Помогите записать во втором проходе -> #7FFFFFF
|