ответ:
объяснение:
понятие информации - одно из самых в современной науке. наряду с такими понятиями, как вещество, энергия, пространство и время, оно составляет основу современной научной картины мира;
в науке существует три подхода к феномену информации
атрибутисты полагают, что информация как семантическое свойство материи является неотъемлемым атрибутом всех элементов и систем объективной реальности, она существовала и существует вечно.
функционалисты отрицают существование информации в неживой природе. по их мнению информация через информационные процессы реализует функцию () в биологических, социальных и социотехнических системах. то есть информация - это одна из функций жизни, основное отличие живого от неживого.
антропоцентристы ограничивают сферу информации главным образом социальными системами и определяют ее как содержание (смысл) сигнала, полученного системой из внешнего мира.
var
c, a: array[1..20] of integer;
i: integer;
begin
write('Первый массив ');
for i := 1 to 20 do begin
c[i] := i * (-5);
write(c[i], ' ');
end;
writeln;
write('Преобразованный массив ');
for i := 1 to 20 do begin
a[i] := c[20 - i + 1];
write(a[i], ' ');
end;
end.
ИЛИ Программа не использующая два массива, а просто переворачивающая первый
var
c: array[1..20] of integer;
i: integer;
begin write('Первый массив ');
for i := 1 to 20 do begin
c[i] := i * (-5);
write(c[i], ' ');
end;
writeln;
write('Преобразованный массив ');
for i := 20 downto 1 do write(c[i], ' ');
end.
Обе программы работают!