Для кодирования текста использовалась кодовая таблица символов, содержащая 16662 символов. каждый символ в ней закодирован минимально возможным и одинаковым количеством байт. с этой таблицы закодирована книга, содержащая 155 страниц, на каждой странице 55 строк, в каждой строке по 58 символов. определите размер файла в кбайтах для хранения этой книги. результат округлить до целого числа, отбросив дробную часть.

(I - информационный объем текста, K - кол-во символов, i - вес одного символа/бит на символ)

Дано:

K = 155 * 55 * 58 = 494450 шт

По формуле (N - мощность алфавита, i - вес одного символа)

бит  (округляем в большую сторону так как кусками тут быть не может)

I - ?

I = K * i = 494450 * 15 бит = 7416750.0 бит

7416750.0 бит = 927093.75 байт = 905.364990234375 Кбайт

ответ 905

Объяснение:

a - массив;

sum - сумма элементов массива;

avrg - среднее значение.

Пример алгоритма решения задачи:

Заполняем массив (например, случайными числами).

Переменной sum изначально присваиваем значение 0.

Вычисляем сумму элементов, в цикле перебирая массив и добавляя значение каждого к переменной sum.

Находим среднее арифметическое, путем деления суммы на количество элементов (хранится в константе N).

Выводим на экран весь массив и найденное среднее значение. (Это не обязательно, но необходимо для удобства.)

Снова в цикле перебираем массив. Если очередной элемент больше среднего арифметического, то выводим этот элемент на экран.

const N = 10;

var

a: array[1..N] of integer;

i: byte;

avrg: real;

sum: integer;

begin

randomize;

for i:=1 to N do a[i]:=random(50)+1;

sum := 0;

for i:=1 to N do sum := sum + a[i];

avrg := sum/N;

// весь массив

for i:=1 to N do write(a[i]:3);

writeln;

writeln('Среднее арифм.: ',avrg:4:2

for i:=1 to N do if a[i]>avrg then write(a[i]:3);

writeln;

end.

Пример выполнения программы:

7 36 21 48 33 46 7 17 19 41

Среднее арифм.: 27.50

36 48 33 46 41

Namespace:   System.Windows.Forms
MessageBox
public static DialogResult Show( string text ) - только сам текст сообщения
Например
MessageBox.Show("Hello, world.");

Есть много перегрузок у метода Show
Show(String, String) - текст и заголовок
Show(String, String, MessageBoxButtons) - текст и заголовок и кнопки
Show(String, String, MessageBoxButtons, MessageBoxIcon) - плюс иконка окна сообщения
Show(String, String, MessageBoxButtons, MessageBoxIcon, MessageBoxDefaultButton) - плюс выбрана кнопка по умолчанию
И еще и еще. Смотрите справку на сайте MSDN

Пример с иконкой
MessageBox.Show("Typical installation is strongly recommended.", "Install information", MessageBoxButtons.OK, MessageBoxIcon.Information);