1)
const
n=10;
var
a:array[1..n]of integer;
i:integer;
begin
for i:=1 to n do
read(a[i]);
writeln;
for i:=1 to n do
write(a[i]:4);
end.
2)
var
a:array[1..1000]of real;
i,n:integer;
begin
writeln('n ?');
readln(n);
for i:=1 to n do
begin
writeln('INPUT ',i,' элемент');
readln(a[i]);
end;
writeln;
for i:=1 to n do
write(a[i]:4:2);
end.
3)
var
a:array[1..1000]of real;
i,n:integer;
begin
writeln('n ?');
readln(n);
for i:=1 to n do
begin
a[i]:=random;
write(a[i]:4:2);
end;
writeln;
end.
Информационный объем текста складывается из информационных весов составляющих его символов, Например, следующий текст, записанный с помощью двоичного алфавита:1101001011000101110010101101000111010010<span>содержит 40 символов, следовательно, его информационный объем равен 40 битам.
Т.е. (48*20*60)*2 = 115200 бит = </span>0,014 Мб<span>
</span>1 Мегабайт (Мб) = 1024 Килобайт (Кб) * 8 192 = 8 388 608 бит
<span>1 Килобайт (Кб) = 1024 Байт * 8 = 8 192 бит </span>
<span>1 Байт = 8 Бит</span>
Вадим - Футбол и физика.
Саша - Баскетбол и информатика.
Агата - Хоккей и математика.
Валя - Волейбол и химия.
А)Еёмф гсёна - рпуёцё шбт
б)Т Опгэн дпепн
в)Рёсгпё тёоуавса
1. d
2.d
P.s Пишу эти буквы для того чтобы пропустили ответ надо же 20 символов)