Создать массив из 30 элементов, найти сумму и произведение элементов, минимальный и максимальный элемент массива, программу выполнить в Pascal ABC

Program P_1; {Создать массив из 30 элементов, найти сумму и произведение элементов, минимальный и максимальный элемент массива, программу выполнить в Pascal ABC}

Const n=30;

Var m: array[1..n] of real;

Var i,j: integer;

Var S,P:real;  

Var min,max: real;

begin

 writeln ('ввод массива m из ',n,' элементов:');

 for i:=1 to n do  

   read(m[i]);

 for j:=1 to n do

   begin

   write('m[',j,']='); writeln(m[j]);

 end;

 S:=0;

 for i:=1 to n do

   S:=S+m[i];

 writeln('Сумма всех элементов массива =',S);

 P:=1;

 for i:=1 to n do

   P:=P*m[i];

 writeln('Произведение всех элементов массива =',P);

 min := m [1];

 for i := 1 to n do  

 if m[i] < min then  

 min := m[i];

 writeln ('Минимальный элемент массива ', min);

 max := m [1];

 for i := 1 to n do  

 if m[i] > max then  

 max := m[i];

 writeln ('Макимальный элемент массива ', max);

end.

Завоевание независимости отдельных частей Испанской Амери­ки С. Боливар считал лишь первым шагом на пути к более великой цели — созданию сильного единого государства встать вровень с крупнейшими державами мира. По его инициативе Вели­кая Колумбия заключила договоры о союзе с большинством латино­американских государств, а летом 1826 г. их представители собра­лись в Панаме для обсуждения общих дел. Однако Панамский кон­гресс не оправдал надежд Боливара и ему пришлось распрощаться с мечтой об американском единстве.

Объяснение:

Информация в компьютере представлена в двоичном коде, алфавит которого состоит из двух цифр (0 и 1).Цифры двоичного кода можно рассматривать как два равновероятных состояния (события). При записи двоичной цифры реализуется выбор одного из двух возможных состояний (одной из двух цифр) и, следовательно, она несет количество информации, равное 1 биту.Даже сама единица измерения количества информации бит (bit) получила свое название от английского словосочетания Binary digiT (двоичная цифра).Важно, что каждая цифра машинного двоичного кода несет информацию в 1 бит. Таким образом, две цифры несут информацию в 2 бита, три цифры - в 3 бита и так далее. Количество информации в битах равно количеству цифр двоичного машинного кода.Каждая цифра машинного двоичного кода несет количество информации, равное одному биту.