Составте программу вычисления произведения чисел в диапозоне от 1до 10 1*2*3*4**10

Program fac;     var n: integer; function fact(n: integer): integer; begin if n=1 then fact: =1             else fact: =fact(n-1)*n; end; begin write('vvedi chislo: '); // число 10 )) readln(n); n: =fact(n); writeln('otvet: ', n); read; end .

1. 0,25 кбайт=256 байт = 2048 бит

2. каждый символ - 8 бит

3. 2048/8=256 символов

27: 2=13       \1 13: 2=6         \1 6: 2=3           \0 3: 2=1           \1                     \1. 27(10)=11011(2).