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 символ занимает бит.
1 - информация - это совокупность данных, которые имеют определенную ценность.
2 - интернет,телевидение,радио,газеты.
3 - декларативные знания - это фактические знания. Например: стол круглый, вода мокрая, огонь горячий.
Процедурные знания - это правила преобразования объектов(инструкции, алгоритмы,рецепты и.т.д.). Например: чтобы помыть тарелку нужно: открыть кран, отрегулировать температуру, взять губку, нанести на нее моющее средство, вспенить губку, круговыми движениями натирать тарелку пока она не станет чистой.
4 - (адресовано) сообщение идентифицирует человека.
Например: Маша, одевайся теплее, на улице холодно.
(не адресовано) Жители города, будьте внимательны, сегодня будет сильная гроза.
10. 4^4= 256
11.
F(1) = 1+3= 4
F(2) = 2+3=5
F(3)= 5+4=9
F(4)=9+5=14
F(5)= 14+9= 23
F(6)= 23+14=37
F(7) = 37+23=60 - ответ
Const n=10;
var A : Array [1..10] of integer;
i, mini, maxi, min,max, c,k: integer;
begin
for i := 1 to n do
begin
A[i] := random(10);
write(' ',A[i]);
end;
maxi:=1;
mini:=1;
For i:=1 to n do
begin
min:=A[1];
If A[i]>max then
begin
max:=A[i];
maxi:=i;
end;
If A[i]<min then
begin
min:=A[i];
mini:=i;
end;
c:=A[maxi];
A[maxi]:=A[mini];
A[mini]:=c;
end;
Writeln;
for i:=1 to n do
begin
Write(' ',a[i]);
end;
Writeln;
for i:=1 to n do
begin
If a[i]>4 then
begin
a[i]:=4;
inc(k);
end;
Write(' ',a[i]);
end;
Writeln;
Write('Количество: ',k);
<span>end.</span>