1) в 3 раза, так как чтобы закодировать 512 цветов нужно 9 знаков - 9 бит, а на 8 - 3 знака - 3 бит. Путём несложных вычисление 9/3 = 3
2) 128*128 = 16384 точки нужно закодировать. 4 кбайт - 32768 бит. 32768/16385 = 2 бита. А с помощью 2-х бит можно закодировать 4 цвета.
512000 * 60=307200001 кб = 1024 байт
30720000 : 1024=30000 кб
<span>Ответ : 30000 кб</span>
Program soprotiv; {Название программы}
<span>var r1, r2:real; {Задаем переменные} </span>
<span>c:byte; </span>
<span>begin {Начало программы} </span>
<span>write ('Введите 1 сопротивление... '); {Вывод сообщения о вводе данных} </span>
<span>readln (r1); {Ввод данных с клавиатуры} </span>
<span>write ('Введите 2 сопротивление... '); {Вывод сообщения о вводе данных} </span>
<span>readln (r2); {Ввод данных с клавиатуры} </span>
<span>write ('Если соединение параллельное, то нажмите клавишу 1, если соединение последовательное - нажмите 0...'); {Вывод сообщения о вводе данных} </span>
<span>readln (c); {Ввод данных с клавиатуры} </span>
<span>if c=1 {условие} </span>
<span>then writeln ('Сопротивление электрической цепи, соединенной параллельно=',(r1*r2)/(r1+r2)) {Вывод значения, при параллельном соединении} </span>
<span>else writeln ('Сопротивление электрической цепи, соединенной последовательно=',(r1+r2)); {Вывод значения, при последовательном соединении} </span>
<span>end. {Конец программы} </span>