program ggl; Это название программы var n, i, sum : integer; Описание переменных a : array [1..1000] of integer; Описание массива а (он целочиленный, в интервале от 1 до 1000) begin readln (n); Начало программы, запрос значение переменной n sum := 0; Присвоение переменной sum значение 0 begin readln (n); sum := 0; for i := 1 to n do begin a[i] := random (100); write (a[i], ' '); sum := sum + a[i]; end; begin характеризует начало новой подпрограммы. Она - цикл, в котором идет перебор чисел от 1 до значения n, элементам массива a присваиваются рандомные числа от 1 до 100, элементы массива выводятся на экран. После идет подсчет значения переменной sum (причем сначала находится, например, первый элемент массива, а уже после значение переменной sum, после второй элемент массива и он прибавляется к прежнему значению переменной sum). Подпрограмма кончается. writeln; write (sum / n); end. Вывод значения деления переменной sum на переменную n. Конец всей программы.
Объяснение:
Переведем оба числа в десятичную систему счисления:
В итоге - 103 < 163