найдите ошибку в данной программе:
var a,b,y : integer ;
begin
a: =10; b=6;
y: =a / b
writeln(y)
end.

4

Объяснение:

фрагмент кода меняет соседние элементы массива, если предыдущий меньше последующего и считает кол-во этих перестановок

Исходный

      8 9 5 3 2 8 4 2 1 9    d := 0 ( 8 < 9)

1)     9 8 5 3 2 8 4 2 1 9    d := 1   (8 !< 5)

2)    9 8 5 3 2 8 4 2 1 9    d := 1   (5 !< 3)

3)    9 8 5 3 2 8 4 2 1 9    d := 1   (3 !< 2)

4)    9 8 5 3 2 8 4 2 1 9    d := 1   (2 < 8)

5)    9 8 5 3 8 2 4 2 1 9    d := 2   (2 < 4)

6)    9 8 5 3 8 4 2 2 1 9    d := 3   (2 !< 2)

7)    9 8 5 3 8 4 2 2 1 9    d := 3   (2 !< 1)

8)    9 8 5 3 8 4 2 2 1 9    d := 3   (1 < 9)

8)    9 8 5 3 8 4 2 2 9 1    d := 4

ответ: d := 4

Информационный объём отсканированного изображения =

22 348 800 байт или 21,31 Мегабайт

Объяснение:

Дано:

Разрешающая сканера 600 х 600 dpi.

Размер 5см x 5см.

Глубина цвета - 16 байта.

Найти:

Каков информационный объём этого файла?

Вначале переводим глубину цвета из байт в биты

16 байта * 8бит в байте = 128 бит

Вычисляем разрешение сканера в 1 дюйме квадрат

600*600 = 360 000 пикселей в 1 дюйм^2

Переводим размер картинки из квадратных сантиметров в квадратные дюймы:

5см =1,97 дюйма

5см =1,97 дюйма

5*5=25 см^2 = 1,97 * 1,97 = 3,88 дюйм^2

Вычисляем количество пикселей в изображении:

3,88 дюйм^2 * 360 000 пикселей в 1 дюйм^2 = 1 396 800 пикселей.

Информационный объём вычисляем по формуле

количество пикселей * глубину цвета =

1 396 800 пикселей * 128 бит = 178 790 400‬ бит.

Переводим в байты делением на 8:

22 348 800‬ байт.

или же делим 22 348 800 на 1024*1024 чтобы получить количество мегабайт:

21,31 Мегабайт.

если тебе понравился ответ, то отметь его как лучший)