Сделать дз по информатике авторы босова сторона передабщая информацию, 2 слова первое 8букв второе 10букв, второй вопрос сторона принимающаяя информацию, 1слово8букв 2слово 10букв, 3вопрос ссистема обмена сообщеньями(письмами)с компьютерных сетей 1слово 11букв 2слрво 5букв

Источник, Приемник, Почта

Uses crt;
var b:array [1..10] of real;
    min,max,x:integer;
    sum,pr,t:real;
begin
     sum:=0; pr:=1;
     for x:=1 to 10 do
     begin
          write('b[',x,']:'); readln(b[x]);
     end;
     min:=1; max:=1;
     for x:=1 to 10 do
     begin
         if b[x]<b[min] then min:=x;
         if b[x]>b[max] then max:=x;
     end;
     t:=b[min];
     b[min]:=b[max];
     b[max]:=t;
     if max>=min then
     for x:=min+1 to max-1 do
         sum:=sum+b[x]
     else
     for x:=max+1 to min-1 do
         sum:=sum+b[x];
     for x:=1 to 10 do
         if b[x]<0 then pr:=pr*b[x];
     for x:=1 to 10 do
         write(b[x],' ');
     writeln; writeln(sum);
     writeln(pr);
end.    

Многоуровневый список, имеющего четыре уровня вложенности компьютера.

1. Процессор
2. Память
  2.1. Оперативная память
  2.2. Долговременная память
    2.2.1. Жесткий магнитный диск
    2.2.2. Дискета
    2.2.3. Флэш-память 
    2.2.4. Оптические диски
       2.2.4.1. CD
       2.2.4.2. DVD
3. Устройства ввода
  3.1. Клавиатура
  3.2. Мышь
  3.3. Сканер
  3.4. Графический планшет
  3.5.Цифровая камера
  3.6. Микрофон
  3.7. Джойстик
4. Устройства вывода
  4.1. Монитор
    4.1.1. Жидкокристаллический монитор
    4.1.2. Монитор на электронно-лучевой трубке
  4.2. Принтер
    4.2.1. Матричный принтер
    4.2.2. Струйный принтер
    4.2.3. Лазерный принтер