Смотря в какой кодировке. Если кодировка КОИ-8, значит один символ кодируется, то есть весит 8 бит. И так всегда. Значит: 2000символов×8бит=16000бит=16000:8=2000байта(так как что бы перевести биты в байты, нужно разделить кол-во битов на 8, а что бы перевести в килобайты, нужно ещё разделить и на 1024).Но тут в килобайты перевести нельзя. Невозможно. размер сообщения в кодировке КОИ-8. Если же кодировка Unicode, то это значит, что один символ кодируется, то есть весит 16 бит. Значит: 2000символов×16бит=32000бит=32000:8=4000байт. Как и в первом случае, перевести тут в килобайты нельзя. Невозможно. размер сообщения в кодировке Unicode.
Const n=10; m=10; var a: array[1..n,1..m] of integer; b: array[1..n] of integer; i,j,k: integer; begin; k:=0; writeln ('Двумерный массив:'); for i:=1 to n do begin for j:=1 to m do begin a[i,j]:=random(100)-50; write (a[i,j]:4); if (a[i,j]<0) and (abs(a[i,j] mod 2)=1) then k:=k+1; end; writeln; b[i]:=k; k:=0; end; writeln; writeln ('Сформирован одномерный массив:'); for i:=1 to n do write (b[i]:3); end.
