В котором установлен порядок их следования
Что надо сделать???!!!???!!!
Для начала мы переведем Iобьем статьи в биты 2мбайта=2048кбайт=2,097,152байт=16,777,216 бит
После этого переводим 2 байта в бит ;2байта=16 бит
Потом нам надо найти какой обьем 1 страницы
Для это надо "строки×символы×каждый символ сколько кодируется"
Iстраница Iст.=32×64×16=32,768 бит
Значит 32,768 бит это 1 страница
Теперь найдем сколько страниц для этого мы Iобьем статьи разделим на 1 страницу
16,777,216÷32,768=512 значит будет 512 страниц
Теперь отнимаем 2 страницы по условию задачи будет 512-2=510 страниц , после этого находим сколько 510 страниц будет в битах т.е
Iобьем статьи после редактирования=510×32,768=16,711,680 бит
А дальше переводим в байты и в кбайты
16,711,680÷8=2,088,960 байт и из байт в кбайты
2,088,960÷1024=2,040 кбайт
Ответ:<span>информационный объём статьи 2,040 Кбайтах после редактирования.
Вот и вся задача</span>
У файла "index" поменяй формат с "txt" на "html" и закинь все вместе в какую-нибудь папку.
Var
a: array[1..20] of integer;
i,x: integer;
Begin
x := 1;
write('Введите 20 чисел для заполнения массива: ');
for i := 1 to 20 do begin
readln(a[i]);
end;
for i := 1 to 20 do begin
if(a[i] mod 2 = 1) and (a[i] mod 3 = 0) then
x := x * a[i];
end;
writeln('Произведение чисел нечетных и кратных 3 = ', x);
End.
