Program SumAndMul;
Uses Crt;
var a:array[1..10] of real;
i:integer;
sum,mul:longint;
begin
clrscr;
for i:=1 to 10 do
begin
write('Введите -', i,' число:' );
readln(a[i]);
end;
sum:=0;mul:=1;
for i:=1 to 10 do
begin
if (a[i]>0) then sum:=sum+a[i];
if (a[i]<0 ) then mul:=mul*a[i];
end;
writeln('Сумма положительных элементов: ',sum);
writeln('Произведение отрицательных элементов: ',mul);
readkey;
end.
ответ:что такое атр. конц.
Атрибутивная концепция опирается на наиболее широкое понимание информации как отражения разнообразия в любых объектах и процессах, как в живой, так и в неживой природе. В ней информация в самом общем виде определяется как мера неоднородности распределения материи и энергии в и времени, которая сопровождает все протекающие в мире процессы. Под отражением понимается взаимодействующих тел воспроизводить особенности друг друга. Различают четыре формы материи: физическую, химическую, биологическую и социальную. Так как информация является атрибутом материи, она должна существовать на всех ее уровнях.
Объяснение:пример
в атоме много разных частиц, взаимодействующих друг с другом.
(а/(2*с)+(sqrt(2*c/(a-b)))