Program p1;
uses crt;
var a:array[1..30] of integer;
sr,s:real;
i:integer;
begin
for i:=1 to 30 do begin
read(a[i]);
s:=s+a[i];
end;
sr:=s/30;
write(sr);
end.
Он возвращает абсолютную величину параметра, это модуль числа, следовательно значение этого выражения 9,7
Ответ: Живая природа - это самый яркий пример упорядочивания и самоорганизации. Простые молекулы в живом органцме выстраиваются в очень сложные длинные упорядоченные цепочки, в том числе в такие, как молекулы ДНК. Далее, сам живой организм очень сложно структуируется (клетки, органы и т. д. ) Затем, структуризация происходит на уровне сообществ животных и растений (стада, стаи, климатические зоны и т. п. ) Еще сложнее структурировано человеческое общество.
Но есть и более простые механические примеры перехода от хаоса к упорядочению. Например, автоволны или конвекция жидкости при нагревании.
А самое примитивное, это кристаллизация при охлаждении жидкости.
Наоборот, при нагревании кристалла происходит разрушение кристаллического порядка и переход к хаосу.
Переход к хаосу происходит также при горении.
В биологии разрушение биологического упорядочения и переход к хаосу происходит после смерти организма.
1).1 символ - 1 байт.
В 1 кбайте - 1024 байт или 2^10 байт.
Переведем 22,5кб в байты: 22,5 * 2^10 = 23 040 или же 22,5 * 1024 = 23 040.
Теперь 23 040/180 = 128 .
2). Вторую задачу не знаю как решить, либо вы условие не правильно написали. Там вроде ещё должно быть написанно сколько 1 символ занимает бит.
Program P;
Var
a, n, i : Integer;
S : Integer;
Begin
S := 1;
Write('Enter a ');
ReadLn(a);
Write('Enter n ');
ReadLn(n);
for I:=1 to N do
S := S * a;
WriteLn('a ^ n = ', S);
ReadLn;
End.