чернила были красные и черные. весь текст писался чернилами черного цвета, а начало каждого нового раздела, т.е. новой мысли выделяли красными чернилами, так появилось выражение "красная строка", которым мы и сейчас обозначаем новую строку в начале абзаца.
Ответ дал: Гость
var a: array[1..50] of integer; i,f, n: integer;
begin write('n='); readln(n); for i : = 1 to n do begin write('a', i, '='); readln(a[i]); end; f : = 0; writeln; for i : = 1 to n - 1 do if (a[i] mod 2 < > 0) and (a[i + 1] mod 2 = 0) then f : = 1; if f = 0 then begin for i : = 1 to n do if a[i] < 0 then write(a[i]: 4); end else for i : = 1 to n do if a[i] > 0 then write(a[i]: 4); end.
Ответ дал: Гость
A. решение на калькуляторе 1. находим общее количество пикселей n = 1024×768 = 786432 2. находим количество бит, необходимое для отображения цвета одного пикселя k=㏒₂64 = 6 (или просто вспоминаем, что 64=2⁶) 3. определяем объем информации в битах i = n×k = 786432×6 = 4718592 бит 4. переводим в более крупные единицы - в байты: 1 байт=8 бит; 4718592 бит/8 = 589824 байт - в кбайты: 1 кбайт=1024 байта; 589824 байт/1024 = 576 кбайт - в мбайты: 1 мбайт=1024 кбайта; 576 кбайт/1024 = 0.5625 мбайт. б. решение "в степенях двойки" 1. находим общее количество пикселей n = 1024×768 = 2¹⁰×2⁹×1.5 = 2¹⁹×1.5 2. находим количество бит, необходимое для отображения цвета одного пикселя k=㏒₂64 = 6 (или просто вспоминаем, что 64=2⁶) 3. определяем объем информации в битах i = n×k = 2¹⁹×1.5×6 = 2¹⁹×9 бит 4. переводим в более крупные единицы - в байты: 1 байт=2³ бит; 2¹⁹×9 бит/2³ = 2¹⁶×9 байт - в кбайты: 1 кбайт=2¹⁰ байт; 2¹⁶×9 байт/2¹⁰ = 2⁶×9 кбайт = 64×9 = 576 кбайт - в мбайты: 1 мбайт=2¹⁰ кбайт; 2⁶×9 кбайт/2¹⁰ = 2⁻⁴×9 мбайт = 9/16 мбайт = 0.5625 мбайт.
Популярные вопросы