Var i,f,n: integer; begin readln(n); i: =0; f: =1; repeat i: =i+1; f: =f*i; until i< n; write(f); end.
Спасибо
Ответ дал: Гость
половина байта, так как одно поле может принимать только 1 из 2 значений, тоесть 1 клетка 1 бит. так как клеток 4, сталобыть это 4 бит. так как 1 байт = 8 бит то 4 бита это половина байта
Популярные вопросы