Заполнить массив из 30 элементов случайным образом вещественными значениями, лежащими в диапазоне от 0 до 23. найти среднее арифметическое всех элементов массива. уменьшить все элементы на число b.

//pascal abc.net v3.1 сборка 1219 const   n=30;   var   ar: array[1..n] of integer;   i,b: integer;   sr: real; begin   randomize;   writeln('first array: ');   for i: =1 to n do   begin     ar[i]: =random(0,23);     write(ar[i]: 4);     sr: =sr+ar[i];   end;   writeln;   sr: =sr/n;   writeln('sr=',sr);   write('enter value b: ');   readln(b);   writeln('final array: ');   for i: =1 to n do   begin     ar[i]: =ar[i]-b;     write(ar[i]: 6);   end; end. пример работы программы: first array:   22   7   10   13   1   4   5   6   4   21   8   20   17   15   23   5   19   18   20   19   5   11   14   0   11   4   3   23   23   17 sr=12.2666666666667 enter value b: 3 final array:     19     4     7     10     -2     1     2     3     1     18     5     17     14     12     20     2     16     15     17     16     2     8     11     -3     8     1     0     20     20     14

Компью́терная мышь  — координатное  устройство  для   курсором  и отдачи различных команд компьютеру. курсором осуществляется путём перемещения мыши по поверхности стола или  коврика для мыши. клавиши и колёсико мыши вызывают определённые действия, например: активация указанного объекта, вызов  контекстного меню, вертикальная прокрутка веб-страниц и электронных документов. получила широкое распространение в связи с появлением  графического интерфейса пользователя  на  персональных компьютерах. помимо мышек, встречаются другие устройства ввода аналогичного назначения:   трекболы,  тачпады,  графические планшеты,  сенсорные экраны.