Для программирования вершинных и пиксельных процессоров GPU служит язык ...

вопрос

Правильный ответ:

Оставить комментарий

Отправить

• # Внутри блоков класса FlowDocument дополнительное форматирование текста обеспечивается элементами, которые называются ...
• # Пример кода: public event PropertyChangedEventHandler PropertyChanged; демонстрирует:
• # Какое из утверждений верно:
• # Байтовый массив, зарезервированный классом MemoryStream, может иметь как фиксированную, так и произвольную длину; в последнем случае мы можем:
• # Фрагмент кода: Imports System Imports System.IO Imports System.Security.Cryptography Module VBDemo Sub Main() Dim Bytes() As Byte = {65, 66, 67, 68, 69, 70, 71, 72, 73, 74} Dim EncBytes() As Byte = New Byte(15) {} Dim DecBytes() As Byte = New Byte(10) {} Dim FileName As String = "c:\temp\text.enc" Dim EncFile As New FileStream(FileName, FileMode.Create, _ FileAccess.Write) Dim DES As New DESCryptoServiceProvider() Dim DESEncrypt As ICryptoTransform = DES.CreateEncryptor() Dim CryptoStreamEnc As New CryptoStream(EncFile, DESEncrypt, _ CryptoStreamMode.Write) Console.WriteLine("Original Data") ToHexArray(Bytes) CryptoStreamEnc.Write(Bytes, 0, Bytes.Length) CryptoStreamEnc.Close() EncFile.Close() EncFile = New FileStream(FileName, FileMode.Open, FileAccess.Read) EncFile.Read(EncBytes, 0, EncFile.Length) EncFile.Close() Console.WriteLine("Encrypted Data") ToHexArray(EncBytes) Console.WriteLine() Dim DecFile As New FileStream(FileName, FileMode.Open, _ FileAccess.Read) Dim DESDecrypt As ICryptoTransform = DES.CreateDecryptor() Dim CryptoStreamDec As New CryptoStream(DecFile, DESDecrypt, _ CryptoStreamMode.Read) Dim Reader As New BinaryReader(CryptoStreamDec) Console.WriteLine("Decrypted Data") DecBytes = Reader.ReadBytes(10) ToHexArray(DecBytes) End Sub Sub ToHexArray(ByVal A As Byte()) Dim I As Integer For I = 0 To A.GetUpperBound(0) Console.Write("0x{0:x2} ", A(I)) If I = 7 Then Console.WriteLine() End If Next End Sub End Module показано: