Что такое понятие информации, носители информации, виды информации?

Информация - это, когда хотят что-то донести людям. носители информации бывают разные (интернет, книги и т. информация бывает словесной/речевой, звуковой, "видимой".

// pascalabc.net 3.3, сборка 1579 от 18.11.2017 // внимание! если программа не работает, обновите версию! begin   var a: =arrrandom(17,42,65); a.println;   var k: =a.where(t-> t=50).count; // кол-во элементов =50 - 2   writeln('кол-во элементов, равных 50: ',k);   a.transform(t-> t=50? 0: t); a.println // замена и вывод - 1 end. пример 65 45 55 47 50 44 45 43 50 51 44 43 56 45 65 51 65 кол-во элементов, равных 50: 2 65 45 55 47 0 44 45 43 0 51 44 43 56 45 65 51 65

1) var   arr: array[1..17] of smallint;   k, i: smallint; begin   randomize();   k : = 0;   write('массив до замены:       ');   for i : = 1 to 17 do   begin       arr[i] : = random(10, 99);       write(arr[i], ' ');   end;   writeln();   write('массив после замены: ');   for i : = 1 to 17 do   begin       if arr[i] = 50 then begin           arr[i] : = 0;           k : = k + 1;           write(' ');   //эта строка только для оформления вывода, она необязательна       end;       write(arr[i], ' ');   end;   writeln();   writeln('кол-во замененных элементов: ', k); end. 2) var   arr: array[1..17] of smallint;   k, i: smallint; begin   randomize();   k : = 0;   write('массив до замены: ');   for i : = 1 to 17 do   begin       arr[i] : = random(10, 99);       write(arr[i], ' ');       if arr[i] = 50 then k : = k + 1;   end;   writeln();   writeln('кол-во элементов, равных 50-ти: ', k); end.