Var
sum, a,b,c:real;
begin
Readln(a);writeln(a/1000);
read(b);Writeln(b/10000);
end.
Можно улучшить аудиозапись 2мя способами: 1) юзай плагины которые устраняют шумы, артефакты, треск и щелчки.
2)не парься и закажи очистку в студии у знакомых звукорежиссёров.
Не знаю, какой язык вы учите в школе, напишу на паскале
program max;
var
x, y: Integer;
begin
if x > y then writeln(IntToStr(x))
else <span>writeln(IntToStr(y));
</span>readln();
end;
Фрагмент программы вначале помещает в переменную m значение элемента массива a[4]=7. Далее в цикле просматриваются элементы массива с номерами от 3 до 6 и сравниваются с текущим значением m. В случае, если значение m окажется меньше очередного элемента, значение этого элемента заносится в m. Легко видеть, что это алгоритм нахождения максимума среди элементов a[3]..a[6]. На выводе будет значение m=12.
<em>Ответ:12</em>
Ответ 4 это кратчайший путь от пункта А до пункта Е