1. Назовите один и первых прогрессивных передачи информации.
2. Назовите одно из самых замечательных изобретений в области связи в ХХ веке.
3. Что может быть источником информации?
4. Назовите одни из самых сложных декодирующих устройств.
5. Что такое декодирование?
6. Назовите основные системы связи.
7. Назовите основные единицы измерения скорости информационного потока
8. Что такое пропускная канала?
9. Из за чего может утрачиваться, искажаться информация в процессе ее передачи.
10. Что такое криптография?​

Const
  bd=['0'..'3'];
var
  s,wa,wb,w:string;
  c:char;
  i,n:integer;
  bad_a:boolean;
begin
  WriteLn('Вводите фразу, разделяя слова ровно одним пробелом');
  Read(s);
  s:=s+' ';
  n:=Length(s); wa:=''; wb:='';
  i:=1; bad_a:=false; w:='';
  while i<=n do begin
    repeat
      c:=s[i];
      if c<>' ' then begin
        bad_a:=bad_a or (c in bd);
        w:=w+c;
        Inc(i)
      end
      else begin
        if not bad_a then wa:=wa+' '+w;
        if s[i-1]='Я' then wb:=wb+' '+w;
        w:=''; bad_a:=false
      end
    until c=' ';
    Inc(i);
  end;
  wa:=Copy(wa,2,Length(wa)-1);
  wb:=Copy(wb,2,Length(wb)-1);
  Writeln(wa);
  Writeln(wb)
end.

программа находит совершенные числа в диапазоне от 1 до 10000 (совершенное число - натуральное число, равное сумме всех своих собственных делителей)

Program z3; ' - заголовок программы
 var ' - служебное слово, начинающее раздел описания переменных
 i,j,s: word; ' - описание переменных i,j,s как числа от 0 до 65535
begin ' - служебное слово, начинающее описание операторов программы
 for i := 1 to 10000 do begin ' - организация цикла по i от 1 до 10000
 s := 0; ' - обнуление переменной s
 for j:=1 to i div 2 do ' - организация цикла по j от 1 до целая_часть(i:2)
 if i mod j = 0 then ' - если i делится на j без остатка,
 s := s+j; ' - то переменную s увеличиваем на значение переменной j
 if s = i then ' - если значения переменных s и i совпадают
 write(i,' '); ' - то распечатываем значение переменной i
 end; ' - конец цикла по i
 writeln; ' - пустой оператор печати, используется для организации печати с новой строки
 readln; ' - пустой оператор чтения, используется для организации задержки экрана
 end. ' - служебное слово, заканчивающее описание операторов программы