в условии не указано но для кодирования используется фраза "в памяти " при этом для нахождения кода шифрованной буквы нужно к коду исходной буквы прибавить код буквы из предложения к первой букве прибавляем код первой буквы предложения ко второй код второй итд т.
а для расшифровки эти коды нужно вычитать, получаем
в п а м я
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
к и е в
Ответ дал: Гость
третье, там где пять
5> 4 и не 5> =6
Ответ дал: Гость
uses graph; {подключен модуль graph}var x,y,h: integer; procedure grinit; {процедура инициализации режима графики}var graphdriver: integer; {для графического адаптера} graphmode : integer; {для графического режима} errorcode : integer; {для кода ошибки}begin graphdriver : =detect; {режим автоопределения} initgraph(graphdriver ,graphmode,''); {инициализация} errorcode : =graphresult; {результат инициализации} if errorcode < > grok then {если не успешно,} begin writeln('ошибка графики: ',grapherrormsg(errorcode )); writeln('программа остановлена.'); halt(1) end {if}end; begin grinit; {вызов инициализации} x: =getmaxx div 2; y: =getmaxy div 2; h: = 30; {кол-во шагов до финиша} while x+y> 0 do begin cleardevice; circle(x, y, 10); delay(100); x: = x + getmaxx div h; y: = y - getmaxy div h; end; readln; {пауза до нажатия } closegraph; {закрытие графического режима}end.
Популярные вопросы