a = 3
b = 11
a = 11 - 3*2 = 11 - 6 = 5
b = 50 / 5 * 4 = 10 * 4 = 40
Ответ: 40.
Var n,k1,k2:integer;
begin
write('n = ');
readln(n);
k1:=0; k2:=0;
while n>0 do
begin
if n mod 2=0 then k1:=k1+1 else k2:=k2+1;
n:=n div 10;
end;
writeln('Четных цифр - ',k1,', нечетных - ',k2);
end.
Пример:
n = 14568
Четных цифр - 3, нечетных - 2
Размер битмапа в дюймах: 3.937 * 5.906
размер битмапа в пикселах: 1181 * 1771 = 2091551
размер битмапа в единицах информации = 2091551 * 16 = 33464816(бит) = 4183102(байт) = 4085(килобайт) = 3.989(мегабайт)
Строго говоря, это именно размер битмапа, а не выходного файла: во-первых, в различных форматах хранения графических данных используются различные алгоритмы сжатия битмапа, иногда с потерей качества, иногда без; это уменьшает размер файла. С другой стороны, в графическом файле присутствует различная служебная информация (специфична для используемого формата файла), что увеличивает (незначительно) размер файла.