32 кбайт * 1024 * 8 = 262144 бит
256 * 128 = 32768 пикселей
262144 бит / 32768 пикс = 8 бит на пиксель
2^8 = 256 максимально число влезет.
Var n,i,k:integer;
begin
write('n = ');
readln(n);
k:=0;
case n of
3..9 : k:=1;
10..99 : begin
k:=1;
for i:=10 to n do
if (i mod 10 = 3)or(i div 10 = 3) then k:=k+1;
end;
100..999:begin
k:=1;
for i:=10 to 99 do
if (i mod 10 = 3)or(i div 10 = 3) then k:=k+1;
for i:=100 to n do
if (i div 100=3)or(i div 10 mod 10=3)or(i mod 10=3) then k:=k+1;
end;
end;
writeln('k = ',k);
end.
Пример:
n = 120
k = 21
Является основателем теории передачи информации, нашедшей применение в
современных высокотехнологических системах связи. Шеннон внес огромный
вклад в теорию вероятностных схем, теорию автоматов и теорию систем
управления — области наук, входящие в понятие “кибернетика”. В 1948 году
предложил использовать слово “бит” для обозначения наименьшей единицы
информации (в статье “Математическая теория связи”).
Плохо видно .Извени не могу ответеть на твой вопрос
Можно проанализировать работу цикла по шагам (берутся при расчете всегда текущие, т.е. последние значения переменных). Цикл с параметром i выполняется 5 раз:
1 шаг. i=1, f=f*i=1*1=1
2 шаг. i=2, f=1*2=2
3 шаг. i=3, f=2*3=6
4 шаг. i=4, f=6*4=24
5 шаг. i=5, f=24*5=120
В результате вычисляется то, что называется факториалом числа (обозначается знаком !), в данном случае 5!
