logo
Вход Регистрация Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
sasha22114
sasha22114
06.10.2021 17:01 •  Информатика

Каков информационный объем книги,если в ней 200 страниц текста,на каждой странице по 50 строк по 80 символов и 10 цветных рисунков.Каждый рисунок подстроен при графическом разрешении монитора 800X600 с палитрой 16 цветов желательно с подробным решением.

👇
Увидеть ответ
Ответ:
соня1582
соня1582
06.10.2021
Дано:

Количество символов: 200*50*80

Количество рисунков: 10

Параметры рисунка:

K = 800×600N = 16 цветов

I -  ?

Решение:

Находим информационный объем текста:

В условии не сказано, в какой кодировке записан текст, поэтому считаем как 1 байт.

I[текста]  =  200*50*80*1  =  800 000 байт.

Находим информационный объем рисунка:

i = log₂N = log₂16 = 4 бита

I[рисунка] = K*i = 800*600*4 = 1 920 000 бит = 240 000 байт.

I[рисунков] = I[рисунка] * 10 = 2 400 000 байт.

Находим информационный объем книги:

I = I[текста] + I[рисунков] = 800000 + 2400000 = 3200000 байт

I = 3200000 байт = 3125 КБ ≈ 3,05 МБ

ответ:  3125 КБ (примерно 3,05 МБ)

4,6(12 оценок)
Открыть все ответы
Ответ:
yanchikkatsia
yanchikkatsia
06.10.2021
ИСПРАВЛЕНО
---
Uses crt;
{описание переменных}
var a,b,c: array [1..20] of integer;
    x,sum:integer;
begin
     sum:=0; {обнуляем сумму}
     for x:=1 to 20 do {включаем цикл ввода массивов}
     begin
          write('a[',x,']:'); {вывод текста на экран}
          readln(a[x]); {ввод массива А}
          write('b[',x,']:'); {вывод текста на экран}
          readln(b[x]); {ввод массива В}
          c[x]:=a[x]+b[x]; {формируем массив С}
          if x mod 2=0 then
             sum:=sum+c[x];
     end;
     writeln; {переводим указатель на новую строку}
     for x:=1 to 20 do {цикл вывода массива С}
         writeln('c[',x,']:',c[x]); {вывод текста на экран}
     writeln('sum=',sum); {сумма четных элементов массива С}
end.
---
текст в фигурных скобках удалять не обязательно, он на код не влияет.
4,4(77 оценок)
Ответ:
Renavalion
Renavalion
06.10.2021
// PascalABC.NET 3.0, сборка 1128
const
  nmax=100;
var
  n,i,j,nn,nz,np,t:integer;
  a,an,az,ap:array[1..nmax] of integer;
begin
  // формируем массив и выводим его
  Write('Количество элементов в массиве: '); Read(n);
  for i:=1 to n do begin
    a[i]:=Random(11)-5;
    Write(a[i],' ')
    end;
  Writeln;
  // разбиваем массив на три подмассива
  nn:=0; nz:=0; np:=0;
  for i:=1 to n do
    if a[i]<0 then begin nn:=nn+1; an[nn]:=a[i] end
    else
      if a[i]=0 then begin nz:=nz+1; az[nz]:=a[i] end
      else begin np:=np+1; ap[np]:=a[i] end;
  // сортируем массив с отрицательными элементами по убыванию
  for i:=1 to nn-1 do
    for j:=1 to nn-1 do
      if an[j]<an[j+1] then
        begin t:=an[j]; an[j]:=an[j+1]; an[j+1]:=t end;
  // сортируем массив с положительными элементами по возрастанию
  for i:=1 to np-1 do
    for j:=1 to np-1 do
      if ap[j]>ap[j+1] then
        begin t:=ap[j]; ap[j]:=ap[j+1]; ap[j+1]:=t end;
  // формируем новое содержимое массива a
  i:=0;
  for j:=1 to nz do begin i:=i+1; a[i]:=az[j] end;
  for j:=1 to np do begin i:=i+1; a[i]:=ap[j] end;
  for j:=1 to nn do begin i:=i+1; a[i]:=an[j] end;
  // вывод результата
  for i:=1 to n do Write(a[i],' ');
  Writeln
end.

Тестовое решение:
Количество элементов в массиве: 15
1 2 5 0 -5 -3 0 0 1 -4 3 -2 -2 0 -5
0 0 0 0 1 1 2 3 5 -2 -2 -3 -4 -5 -5
4,5(34 оценок)
Это интересно:
К
Хочешь создать свою банду в GTA San Andreas? Просто следуй этим шагам!...
С
Контроль волос африканского стиля: советы и инструкции...
Ф
5 способов, как быть ближе к Аллаху: разбираемся в духовном росте...
З
Здоровье
29.01.2020
Как похудеть в лице: эффективные способы...
К
Как использовать инструмент «Кисть» в Adobe Illustrator...
Х
Как разобрать кубик Рубика (3X3)...
О
Как титровать: правила и методы...
К
Как размораживать рыбу: советы от профессионалов...
Д
Дом-и-сад
27.06.2020
Как очистить домашний вентилятор: простые способы...
К
Как приготовить веганские запеченные овощи...
Новые ответы от MOGZ: Информатика
Theyom47
Theyom47
07.11.2022
1. Проанализируйте данную программу и составьте аналогичную, определяющую произведение цифр заданного натурального числа, 1000. 2. Составьте программу и блок- схему...
юля2521
юля2521
11.05.2022
всё показано на скринах нужны ответы...
Mishcka10200
Mishcka10200
09.04.2020
З яких складових складається вікно scratch 2.0...
DINA2808061
DINA2808061
13.06.2021
Отметьте высказывания, которые построены с использованием знаков различных формальных языков. Укажите один или несколько правильных вариантов ответа: ОС - операционная...
Ekaaaterina
Ekaaaterina
25.08.2020
Почему мы не можем скачать програмные обеспечения бесплатно?​...
elenazeleneckaya
elenazeleneckaya
26.10.2021
Решите Я совершенно не понимаю информатику......
mashapermyakova
mashapermyakova
03.05.2021
Жыл мезгилдери скриптына сценарий...
Angel168Demon
Angel168Demon
10.10.2020
Записать на математическом языке а) (3*SQR(X)+2*Y)/(X*Y-7.4)+2/3Y б) 5*A*(B*B*B)+(A+B)/(2*A) в) sqr(y)/sqr(b)+(x*x)/(a*a)+(c*c)/(z*z) г) ( х*х*х +2*sqr(x)*x ) – (5x*x...
nastya2730
nastya2730
04.01.2022
Создать программу в паскаль для военкомата. Возраст годности от 18 до 27 лет....
anastasiagrebep08n1o
пожайлуста надо н Написать сочинение на тему: « О чём меня заставил задуматься рассказ ?». Сегодня вторым уроком у Миши русский язык. Это его любимый предмет в школе....

MOGZ ответил

Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
О НАС
ПОМОЩЬ
App
.
.
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ