в условии не указано но для кодирования используется фраза "В памяти компьютера..." при этом для нахождения кода шифрованной буквы нужно к коду исходной буквы прибавить код буквы из предложения к первой букве прибавляем код первой буквы предложения ко второй код второй итд т.
а для расшифровки эти коды нужно вычитать, получаем
в п а м я
3 17 1 14 33
п щ о я к
17 27 16 33 17
-
3 17 1 14 33
14 10 15 19 17
м и н с к
н щ ё п
15 27 7 17
-
3 17 1 14
12 10 26 3
к и е в
Поделитесь своими знаниями, ответьте на вопрос:
1. В текстовых редакторах Блокнот или MS Word дать команду Вставка – Символ –другие символы Выберите обычный шрифт, таблицу кодировки ASCII (дес) или другую по заданию 2. Запишите в двоичном и шестнадцатеричном коде ASCII на русском языке вашу Фамилии и Имя Задание 2. Перейдите от двоичного кода к десятичному и декодируйте следующие тексты: а) 01010101 01110000 0100000 00100110 00100000 01000100 1101111 01110111 01101110; б) 01001001 01000010 01001101; в) 01000101 01101110 01110100 01100101 01110010 Задание 3. Буква «i »в таблице ASCII (см.выше) имеет десятичный код 105. что зашифровано последовательностью десятичных кодов: 108 105 110 107? Задание 4. Десятичный код (номер) буквы «е» в таблице кодировки символов ASCII равен 101. Какая последовательность десятичных кодов будет соответствовать слову: Hard Disk Задание 5. Десятичный код (номер) буквы «о» в таблице кодировки символов равен 111. Что зашифровано с последовательности десятичных кодов: 1) 115 112 111 114 116 2) 109 111 117 115 101 Задание 6. Для 5 букв латинского алфавита заданы их двоичные коды (для некоторых букв из двух бит, для некоторых из трех Эти коды представлены в таблице. A B C D E 000 01 100 10 011 Определить, какой набор букв закодирован двоичной строкой 0110100011000 1) EBCEA 2) BDDEA 3)BDCEA 4) EBAEA
const m=10; n=12;
var a:array [1..m,1..n] of integer;
i,j:integer;
sob:integer;
sst:array[1..n]of integer;
sstr:array[1..m]of integer;
begin
randomize;
for i:=1 to m do begin
for j:=1 to n do begin
a[i,j]:=random(10);
write(a[i,j]:3);
end;
writeln;
end;
sob:=0;
for i:=1 to m do begin
for j:=1 to n do begin
sob:=sob+a[i,j];
end;
end;
writeln('сумма всех элементов массива = ', sob);
writeln;
writeln;
for i:=1 to m do begin
sstr[i]:=0;
for j:=1 to n do begin
sstr[i]:=sstr[i]+a[i,j];
end;
end;
writeln('сумма элементов построчно');
for i:=1 to m do write(sstr[i]:3);
writeln;
writeln;
for j:=1 to n do begin
sst[j]:=0;
for i:=1 to m do begin
sst[j]:=sst[j]+a[i,j];
end;
end;
writeln('сумма элементов по столбцам');
for j:=1 to n do write(sst[j]:3);
end.