Чтобы информация была информацией для человека, необходимо чтобы она удовлетворяла всем свойствам информации, была уктуальна и доступна.
Если городской человек решает задачу о скорости лошади и узнает что за час она может пробежать 20 километров то врядли для него это новая информация, т.к она не актуальна ему
А если бы он жил в местности( и решил такую задачку) где люди ездят на лошадях, т.к другого вида транспарта там нет, и узнает что если он поедет на лошади то будет успевать там куда то там ему надо, то это будет информацией для него
program ;
var
A: array [-1000..1000] of integer;
n, i, b : integer;
begin
writeln('Введите количество чисел');
readln(n);
b:=0;
for i := 1 to n do
readln(A[i]);
for i := 0 to (n) do
b := b+ A[i];
write('Это сумма ');
writeln(b); // Это сумма.
b:=0;
for i := 1 to (n) do
begin
if A[i] = 0 then
b := b+1
end;
write('Это количество нулей ');
writeln(b) ;// это количество нулей
b:= -1001;
for i := 1 to (n) do
begin
if A[i] > b then
b := A[i]
end;
write('Это максимальное число ');
writeln(b); // Это максимальное число
b:= 1001;
for i := 1 to (n) do
begin
if A[i] < b then
b := A[i]
end;
write('Это минимальное число ');
writeln(b) // Это минимальное число
end.