В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История

По площади территории и численности населения Бразилия Одна из самых крупных в мире, занимает около половины площади материка. Она омывается водами Атлантического
океана. Здесь находится одна из крупнейших в мире низменностей и одно из крупнейших в
мире плоскогорий. По её территории протекает самая полноводная река в мире. Страна бо-
гата рудныки полезными ископаемыми, водными и лесный ресурсами. Много крупных
городов, основная часть которых сосредоточена у побережья.
Площадь территории |8 515 767 км2
Плотность населения 22 чел./км2
Население
190 755 тыс. чел.
САМАР
На

Показать ответ
Ответ:
fgdh1waffeaf
fgdh1waffeaf
15.10.2020 01:51

в условии не указано но для кодирования используется фраза "В памяти компьютера..." при этом для нахождения кода шифрованной буквы нужно к коду исходной буквы прибавить код буквы из предложения к первой букве прибавляем код первой буквы предложения ко второй код второй итд т.

а для расшифровки эти коды нужно вычитать, получаем

 

в  п   а  м  я

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

к    и    е    в

0,0(0 оценок)
Ответ:
Alina2007271
Alina2007271
25.07.2022 12:39

type
adrcel=^Element;
Element=record
info:integer;
next:adrcel;
end;
var
start,last,new_el:adrcel;
i:integer;

procedure del2(var start:adrcel);

var

p:adrcel;

begin

p:=start^.next;

if p<>nil then start^.next:=p^.next

end;

begin
start:=nil;
last:=nil;
new_el:=nil;
repeat
new(new_el);
write('info=');
readln(new_el^.info);

new_el^.next:=nil;
if start=nil then
start:=new_el;
else
begin

last:=start;

while last^.next<>nil do last:=last^.next;
last^.next:=new_el;
end;
write('Продолжить? (1-Да/0-Нет):');
readln(i);
until i=0;
writeln('Удалим 2-й элемент');

del2(start);

new_el:=start;
while new_el<>nil do
begin
write(new_el^.info:4);
new_el:=new_el^.next;
end;
readln;
end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота