1. Unicode UTF-16
2. 5120 байт
3. 5 Кбайт
Объяснение:
1. текст содержит различные языки, включая китайский, поэтому кодировка Unicode. Любые одно-байтовые кодировки не подойдут: в китайском алфавите количество иероглифов превышает 256.
Далее тип Unicode может быть UTF-8 и UTF-16. в UTF-8 для каждого символа длина в байтах различна. Для нее не получится рассчитать общую длину текста, не зная что содержит этот текст. Потому выбираем UTF-16 кодировку, два байта на любой символ.
2. 40 * 64 * 2 = 5120 байт
3. 5120 / 1024 = 5 Кбайт
Поделитесь своими знаниями, ответьте на вопрос:
В наше время создатели офисных приложений стараются сделать все для удобства пользователя. Поэтому даже такая мелочь, как представление на экране списков чисел например, для вывода номеров страниц, должна быть тщательно проработана. Васе поручили реализовать функцию, которая по заданному набору целых чисел будет формировать строку, являющуюся его самым коротким текстовым представлением. Текстовое представление - строка, состоящая из разделенных запятыми чисел и диапазонов чисел вида , которые используются для записи набора всех чисел от a до b. При этом все числа, входящие в строку, должны быть упорядочены по возрастанию Васе справиться с поручением. Формат ввода Первая строка входного файла содержится целое число N (1 ≤ N ≤ 1 000 000) размер набора. Вторая строка содержит N задающих набор целых чисел, по абсолютной величине не превосходящих 1 000 000, разделенных пробелами. Одно число может встречаться в этом описании несколько раз. Формат вывода В выходной файл выведите любое из кратчайших текстовых представлений заданного набора чисел. Следите за правильной расстановкой пробелов. Выходные файлы в примерах содержат ровно по четыре пробела.
uses crt;
var X:array [1..8,1..7] of integer; i,j,a,b:integer;
begin
clrscr;
write('Введите диапазон значений заполнения(A-начальное значение, B-конечное): ');
repeat
read(a,b);
until a<=b;
writeln;
randomize;
for i:=1 to 8 do
for j:=1 to 7 do X[i,j]:=random(b-a+1)+a;
writeln('Ваш массив:');
for i:=1 to 8 do
begin
for j:=1 to 7 do write(X[i,j]:5);
writeln;
end;
for i:=1 to 8 do
for j:=1 to 3 do X[i,j]:=sqr(X[i,j]);
writeln;
writeln('Рeзультат:');
for i:=1 to 8 do begin for j:=1 to 7 do write(X[i,j]:5);
writeln;
end;
readkey;
end.