Найти произведение всех целых чисел от a до 20 (значение a вводится с клавиатуры: 1 > =a> = 20).

program xxx;

var n, c, d, e, k : integer;

begin

  wtite ('введите 3-х значное число n =');

  readln (n);

  c : = n div 100;

  d : = (n div 10) mod 10;

  e : = n mod 10;

  k: = 100*e + 10*d + c;

  if n = k then write ('палиндром') else write('не палиндром')

end.

35 - 10 = 25 чисел нужно для записи результата

2^ i = 25

i = 5

для кодирования 25 чисел нужно 5 бит

27 * 5 = 135 бит

ответ. 135 бит.

тогда наверное будет:

2^i = 35

i = 6 бит

27 * 6 = 162 бит

ответ. d) 162 бит

но это не верно. т.к. мы кодируем 25 числе, а не 35. возможно в ответах опечатка

101=1*8^0+0*8^1+1*8^2=1*1+0+64=(65) в десятичной

1в=в*16^0+1*16^1=12*1+1*16=12+16=28 в десятичной

65-28=37

38 в десятичной , но такого ответа нет, значит надо перевести 37 в двоичную систему. для этого 38 делим на 2 пока делится

38/2=19 остаток0

19/2=9 остаток 1, уже видно что двоичный второй ответ не подходит, там нет нуля.

  попробуем переведем в восьмеричную, для этого делим 38 на 8.

38/8=4 остаток 6, получается 46 в  8 сс.  ответ 4 

1)10см=3,937дюма

dpi - точек на дюйм

3,937*1000=3937 - точек

3937*3937=15499969 точек

каждая точка кодируется 2-мя байтами 

всего  30999938 байт

1 мегабайт = 1024*1024=1048576

на картинку  29,56 мегабайта

2) 256 1 байт

200*100=20000 пикселей

1 килобайт = 1024 байта

картинка займет 20000/1024=19,5 килобайта

ps а вообще, каждое нужно писать отдельно