Сканируется цветное изображение размером 10 х 10 см. разрешающая сканера _ 1200 х 1200 dpi, глубина цвета - 24 бита. какой информационный объем будет иметь полученный графический файл?
1. Это сведения, знания, сообщения о положении дел, которые человек воспринимает из окружающего мира с органов чувств (зрения, слуха, вкуса, обоняния, осязания). 2. Текстовая, числовая, графическая, звуковая, комбинированная. 3. Процессы получения, создания, сбора, обработки, хранения, накопления, поиска, представления, использования и распространения информации. Основные виды: хранение, передача, обработка информации. 4. Количество символов, используемых в алфавите. 5. Бит, байт, кбайт, мбайт, гбайт. 6. N = 2^i, где N - мощность алфавита; I - количество бит на символ. 7. Единицы измерения: 1 байт = 8 бит. 8. Информация, хранящаяся на внешнем носителе и объединенная общим именем. 9. Программы, которые обеспечивают управлением работы устройств и согласовании информационного обмена с другими устройствами. 10. Компьютерная программа, используемая для написания и модификации документов, компоновки макета текста и предварительного просмотра документов в том виде, в котором они будут напечатаны. 10. 32 бита = 4 байта, 2,5 кбайта = 2560 байта, 3 кбайта = 24576 бит, 6 байт = 48 бит.
Var N, k, digit, prod: longint; begin readln(N); prod := 1; // Произведение не должно быть равно 0, в вашем случае просто отделают последнюю цифру, не проверяя ее кратна она 3 или нет k := 0; while (N > 0) do begin digit := N mod 10; if (digit mod 3 = 0) and (digit<>0) then begin // (digit<>0) проверка на неравенство нулю(любое число*0=0) prod := prod*digit; k := k+1; end; N := N div 10; end; if (k = 0) then writeln('NO') else writeln(prod) // Выводить нужно не конечное N, а именно произведение(prod) end.
