Если это звуковой файл, то увеличить частоту дискретизации
<em>var a, b, i, c :integer;</em>
<em>begin</em>
<em> read (a, b); </em><em>// вводим a и b </em>
<em> for i:=1 to 5 do</em>
<em> begin</em>
<em> c:=random(b-a)+a; </em><em>// присваиваем рандомные числа в заданном </em><em>промежутке</em>
<em> writeln (c); </em><em>// выводим число</em>
<em> end;</em>
<span><em>end.</em></span>
X mod y - это остаток от деления x на y, x div y - частное.
После выполнения первой строки значение а не изменится, значение b станет равным (349 mod 10)*100+14=9*100+14=914.
После выполнения второй строки значение a станет равным <span>(914 div 10) mod 10=91 mod 10=1
Ответ: 1
</span>
… ( , . ? - ) :
возможно ещё несколько вариантов