Я люблю всех вас, ребята! Продолжение во Декодируйте

второй может китель, а первый не догадываюсь

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

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.

125 -   5/7

  х     - 2/7

х = (125 * 2/7) : 5/7 = 50 человек