Запустить программу на выполнение. Найти и исправить синтаксические ошибки. Введите элементы массива (-1, 5, 45, 0, 2). Program
Запустить программу на выполнение. Найти и исправить синтаксические ошибки. Введите элементы массива (-1, 5, 45, 0, 2).
<span>Program Massiv_1a; </span> <span>Var a:Array [1..20] Of Integer </span> <span>i,k:Intege </span> <span>Begin </span> <span>write('Введите количество элементов массива не более 20:'); </span> <span>Read(k); </span> <span>For i:=1 To k Do </span> <span>Read(a</span><em>) End.</em>
Var a:Array [1..20] Of Integer; i:Integer; k:Integer; Begin write('Введите количество элементов массива не более 20:'); Read(k); For i:=1 To k Do Read(a[i]); <span>End.</span>
Если символ кодируется одним байтом, то объем сообщения = 256*1 = 256 байт. Если символ кодируется двумя байтами, то объем сообщения = 256*2 = 512 байт.