Сижу на информатике- не понимаю(( 1) напишите программу вычисления факториала числа n (произведение чисел от 1 до n) 2) напишите программу суммы четных чисел от 1 до 5 3) напишите программу угадывания чисел, в которой компьютер делает подсказки: меньше или больше.

1) 7ая с этой страницы 

Type   digits=array[0..9] of byte; procedure rd(n: integer; var ad: digits; var f: boolean); { заполняет массив количеством повторений цифр числа n   f=true, если хоть одна цифра повторяется } var   i,d: byte; begin   for i: =0 to 9 do ad[i]: =0;   f: =false;   while n> 0 do begin       d: =n mod 10;       ad[d]: =ad[d]+1;       if ad[d]> 1 then f: =true;       n: =n div 10       end; end; var   i,j,n,k: integer;   a: digits;   f: boolean;   begin   for i: =1 to 2 do begin       write('n = '); read(n);       n: =abs(n); { против ввода отрицательных }       rd(n,a,f);       if f then begin           write('встречаются больше одного раза цифры ');           for j: =0 to 9 do               if a[j]> 1 then write(j,' ');           writeln           end       else writeln('все цифры в числе уникальны')       end end. пример n = 153632 встречаются больше одного раза цифры 3 n = 1030041 встречаются больше одного раза цифры 0 1 var   s,sr: string;   c: char;   i,j,n,p: byte;       begin   for i: =1 to 2 do begin       write('введите строку: '); readln(s);       n: =length(s);       sr: ='';       for j: =1 to n do begin           c: =s[j];           if pos(c,copy(s,j+1,n-j))> 0 then sr: =sr+c+' ';           end;       if length(sr)> 0 then writeln('встречаются больше одного раза символы ',sr)       else writeln('все символы в строке уникальны')       end end. пример введите строку: информатика встречаются больше одного раза символы и а введите строку: проблема все символы в строке уникальны

1. серверами надо , контролировать, соответственно есть компьютеры, с них через локальную сеть контролируют сервера. именно так и делают в дата-центрах. 2. локальная сеть - это компьютеры находящейся в одном здании, по-крайней мере до куда дотянется провод интернета, или сигнал wi-fi. корпоративная сеть может содержать в себе многие корпуса/офисы той или иной компании, обычно сигнал (в корпоративной примерно таким образом: компьютеры одного офиса (например) подключаются к vlan, в то время к vlan подключен обычный интернет по которому передает сигнал к другому vlan который находиться в другом офисе. в большинстве случаев, хоть и идет конечная передача данных через обычный интернет, но сайты все там заблокированы, в основном используют ftp протокол для передачи данных, не более. 3. своими словами децентрализация это  перераспределение. в данном случае имеется виду  перераспределения обработки той или иной информации между компьютерами/серверами, даже если один сервер/компьютер выйдет из строя, обработка будет идти на остальных компьютерах.