в условии не указано но для кодирования используется фраза "в памяти " при этом для нахождения кода шифрованной буквы нужно к коду исходной буквы прибавить код буквы из предложения к первой букве прибавляем код первой буквы предложения ко второй код второй итд т.
а для расшифровки эти коды нужно вычитать, получаем
в п а м я
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
к и е в
Ответ дал: Гость
написано для pascal abc
uses graphabc; begin window.title : = 'apple'; var y,y0,x,t: integer; brush.color : = clgreen; y0: =70; x: =70; lockdrawing; for t : = 0 to 8 do begin y: =y0+5*t*t; window.clear(clwhite); circle(x,y,50); redraw; sleep(100); end; end.
Ответ дал: Гость
var a,b,c,d,e: real;
begin
read(a,b,c,d);
e: =(a+b+c+d)/4;
writeln(e: 0: 4);
end.
Ответ дал: Гость
var
s,s1: real;
k: integer;
begin
s: =10;
k: =1;
while s< 20 do
begin
s: =s*1.1;
k: =k+1;
end;
writeln('в ', k,' день он пробежит 20 км');
s: =10;
s1: =10;
k: =1;
while s< 200 do
begin
s: =s+s1*1.1;
s1: =s1*1.1;
k: =k+1;
end;
writeln('в ', k,' день суммарный пробег превысит 200 км');
Популярные вопросы