Сколько книг размером в 512 кбайт можно разместить на компакт-диске ёмкостью 700 мб

с cd-r информацию нельзя удалить, можно только добавить. с cd-rw- можно удалить.

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

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.