Var
x,prod1,prod2,ost:real;
begin
Write('Привезено картофеля, кг: ');
Read(x);
prod1:=x*1/4; { продано в первый день }
ost:=x-prod1; { остаток от продажи }
prod2:=ost*2/5; { продано во второй день }
ost:=x-(prod1+prod2);
Writeln('Оcталось продать, кг: ',ost)
end.
<u>Примеры</u>
Привезено картофеля, кг: 2540
Оcталось продать, кг: 1143
Привезено картофеля, кг: 743
Оcталось продать, кг: 334.35
Эти числа были написаны в троичной системе счисления.
Номер квартиры 572.
Объем = Кол-во точек (разрешение) * глубина цвета;
Объем у нас в Килобайтах и равен 8.
Пусть глубина цвета будет X;
Объем в КБ равен:
Остюда X равен:
Глубина кодирования ( i ) = 8 бит.
Кол-во цветов равно:
Ответ: 256 цветов