Про­из­во­дит­ся од­но­ка­наль­ная (моно) зву­ко­за­пись с ча­сто­той дис­кре­ти­за­ции 128 Гц. При за­пи­си ис­поль­зо­ва­лись 16 уровней дис­кре­ти­за­ции. За­пись длит­ся 2 минуты 40секунд, её ре­зуль­та­ты за­пи­сы­ва­ют­ся в файл, причём каж­дый сиг­нал ко­ди­ру­ет­ся ми­ни­маль­но воз­мож­ным и оди­на­ко­вым ко­ли­че­ством битов. Какое из при­ведённых ниже чисел наи­бо­лее близ­ко к раз­ме­ру по­лу­чен­но­го файла, вы­ра­жен­но­му в ки­ло­бай­тах?

​

program test;

var a,b,c:real;

begin

readln(a,b);

 if (a>b) then

 begin

 c := a+b;

 writeln('Итоговое значение с = ', c);

end;

if (a=b) then

begin

  writeln('Одинаковые значения!');

end;

end.

Объяснение:

 if (a>b) then  < Если а больше, чем б

 begin  < Начало

 c := a+b;  < c присваивается значение суммы а и б

 writeln('Итоговое значение с = ', c);  < вывод значения c в консоль

end; < Конец

(Если а будет равняться б, то вывод в консоль будет такой)

if (a=b) then

begin

  writeln('Одинаковые значения!');

end;

Смотри. Если знак ":=" - присваивание, то:

У тебя идёт строка "a:=4", то есть к переменной а присваивается значение 4, значит а=4. Следовательно раз есть строка "a:=4", то к переменной b присваивается значение 6, то есть b=6. Далее у тебя идёт присвоение к переменной b конечного значения формулы "8+ a( а переменная а=4) * b ( а переменная b=6) Мы получаем следующую строку:

b:= 8 + 4 * 6, а это у нас равно 32, то есть к переменной b присваивается значение 32. Далее у нас идёт строка:

a:= b (b= 6) / 4 * a ( a= 4). Следовательно мы получаем следующую строку:

a:= 6 / 4 * 4, а это у нас равно 0.375. То есть переменная a= 0.375

ответ: 0.375