Задание 2. Работа в группе. Разделение класса на 4 группы, Каждая группа проводит обсуждение содержания «Нигерий-
2. Выделите в нем моменты, указывающие на то, что это спати,
3. Перечислите факты, указанные в письме, которые кажутся
ского письма».
1. Внимательно прочитайте текст письма.
вам недостоверными и подозрительными.
4. Проведите коллективное обсуждение содержания «иигерий
ских писем».
Вопросы для обсуждения:
1. Как можно распознать «нигерийское письмо»?
2. Как вы думаете, кто авторы «Нигерийских писем »?
3. Какую цель преследуют авторы «Нигерийских писем»?
4. Какова степень опасности «нигерийских писем»?
стал
Письмо № 1
«Меня зовут Бакаре Тунде, я брат первого нигерийского
астронавта, майора ввс Нигерии Абака Тунде. Мой брат
первым африканским астронавтом, который отпра-
вился с секретной миссией на советскую станцию «Салют-6,
в далеком 1979 году. Позднее он принял участие в полете
советского «Союза Т-163» к секретной советской космической
станции «Салют-8Т». В 1990 году, когда СССР распался, он
находился на станции. Все русские члены команды сумели
вернуться на Землю, однако моему брату не хватило на корабле
места. С тех пор и до сегодняшнего дня он вынужден находиться
на орбите, лишь редкие грузовые корабли «Прогресс» снабжают
его необходимыми продуктами. Несмотря ни на что мой брат
не теряет присутствия духа, однако жаждет вернуться домой,
в родную Нигерию. За те долгие годы, что он провел в космосе,
0,5 Кбайт = 0,5*1024 байт = 512*8 бит
512*8/128 = 32
2.
Память для одного символа = log(2)64=6 бит
Объем текста = 10*32*64*6 бит = 10*32*64*6/8 байт =
10*4*64*6/1024 Кбайт = 15 Кбайт
3.
3 Кбайт = 3*1024 байт = 3*1024*8 бит
Память для одного символа = 3*1024*8/6144 = 4 бита
Количество символов в алфавите = 2^4 = 16
4.
Память для одного символа = log(2)128=7 бит
Объем сообщения = 10*7 = 70 бит
8.
a) 3 Кбайт=3*1024 Байт = 3072 бАЙТ
b) 2 Мбайт=2*1024 Кбайт = 2*1024*1024 байт = 2*1024*1024*8 бит = 16777216 бит
c) 4,5 Гигабайт=4,5*1024 Мбайт = 4,5*1024*1024 Кбайт = 4718592 Кбайт
var a:array[1..4, 1..5] of integer;
i,j,k:integer;
begin
writeln('Заполните матрицу');
for i:=1 to 4 do
for j:=1 to 5 do begin
read(a[i,j]);
if (a[i,j] mod 3=0) and (a[i,j]>20) then k:=k+a[i,j];
end;
writeln('Сумма элементов кратных 3-м и > 20 = ',k);
end.
Задача №2
var a:array[1..5, 1..5] of integer;
i,j,k:integer;
begin
writeln('Заполните матрицу');
for i:=1 to 5 do
for j:=1 to 5 do begin
read(a[i,j]);
if i=j then k:=k+a[i,j];
end;
writeln('Сумма элементов главной диагонали = ',k);
end.