Петя от­ре­дак­ти­ро­вал текст, каж­дая стра­ни­ца которого со­дер­жит 32 стро­ки, в каж­дой стро­ке 64 сим­во­ла. После редактирования объём текста увеличился на 3 стра­ни­цы. Каж­дый сим­вол в статье ко­ди­ру­ет­ся 16 битами. Опре­де­ли­те ин­фор­ма­ци­он­ный объём ста­тьи в Кбай­тах в этом ва­ри­ан­те пред­став­ле­ния Unicode после ре­дак­ти­ро­ва­ния, если ин­фор­ма­ци­он­ный объём текста до ре­дак­ти­ро­ва­ния был равен 2 Мбайт.​

Современным инструментом для информационного моделирования является компьютер. Конечно, на компьютере можно писать тексты (строить вербальные модели), рисовать карты и схемы (графические модели), строить таблицы (табличные модели). Но при таком использовании компьютера в моделировании его возможности проявляются не в полной мере.Главное преимущество компьютера перед человеком к быстрому счету. Современные компьютеры считают со скоростями в сотни тысяч, миллионы и даже миллиарды операций в секунду!Учитывая, что расчеты производятся над многозначными числами (10-20 десятичных цифр), вычислительные человека нельзя даже сравнивать с компьютерными. Эти феноменальные вычислительные возможности проявляются, прежде всего, вкомпьютерном математическом моделировании.

Вот массив который сам заполняется
uses crt;
const
n=100;
var
i,a:integer;
mas1: array [0..n] of integer;
begin
for i:=0 to n do
begin
a:=random(10000);
mas1[i]:=a;
end;
for i:=0 to n do
begin
if i mod 2=0 then
write('A[',i,']=',mas1[i],' ');
end;
end.

вот заполняемый вручную(чтобы записывать через пробел сам измени)))
uses crt;
const
n=100;
var
i,a:integer;
mas1: array [0..n] of integer;
label 1;
begin
for i:=0 to n do
begin
1:read(a);
if a<=10000 then
mas1[i]:=a
else
begin
writeln('a bolwe 10000');
goto 1
end;
end;
for i:=0 to n do
begin
if i mod 2=0 then
write('A[',i,']=',mas1[i],' ');
end;
end.