Сканируется цветное изображение размером 640х128 и глубиной цвета – 8 битов. какой объем в кб будет иметь полученный графический файл?

ответ:

81,92 кб   или   81 kб 920 байт

объяснение:

i = m * n * i

i — объем памяти, требуемый для хранения изображения

m — ширина изображения в пикселях

n — высота изображения в пикселях

i — глубина кодирования цвета или разрешение

1. 640 * 128 = 81920 pixel.

2. 8 битов на 1 точку => 81920 * 8 = 655360 бита.

3. перевод в кб(1 кбайт = 1024 байт)   =   81,92 кб   или   81 kб 920 байт

var x, n: integer; begin write('x = '); readln(x); write('n = '); readln(n); while n > 0 do begin if n mod 10 = x then begin writeln('yes'); readln; exit; end; n : = n div 10; end; writeln('no'); readln; end.

// 2

var a: array[1..100] of integer; i, n: integer; begin randomize; n : = random(18 + 3); writeln('n = ', n); for i : = 1 to n do begin a[i] : = random(11) - 5; while a[i] = 0 do a[i] : = random(11) - 5; write('a[', i, '] = ', a[i], ' '); end; a[i + 1] : = 0; writeln; i : = 1; while(a[i + 1] < > 0) do begin if (a[i] = a[i + 1]) then begin writeln('a[', i, '] = a[', i + 1, '] = ', a[i]); readln; exit; end; inc(i); end; writeln('нет ни одной пары одиноковых соседних чисел'); readln; end.