Дано описание массива:

var a: array [1..47] of integer;

здесь oписан массив a из целочисленных значений. при выполнении этого оператора в памяти компьютера будет выделено ячеек целого типа.

здесь oписан массив a из 47 целочисленных значений. при выполнении этого оператора в памяти компьютера будет выделено 47 ячеек целого типа.

пусть введенный интервал будет

b и c,где b< c

var a,b,c,i: longint;

begin

    read(b,c);

    for i: =b to c do

            if i mod a=0 then write(i);

end.

в десятичной:

45 = (4*8)^1 + (5*8)^0 = 32 + 1 = 33

106 = (1*8)^2 + (0*8)^1 + (6*8)^0 = 64 + 1 = 65

в двоичной:

45 = 101101

106 = 1101010