1.
1) A + B (складываем)
2) A+B/2 (находим полусумму)
2.
1)A-C ( вычитаем)
2) найти модуль A-C
3.
1)B*C ( умножаем)
2) B*C возводим в квадрат
<em>// PascalABC.NET 3.2, сборка 1338 от 16.11.2016</em>
begin
var a,b:integer; Read(a,b);
Writeln(max(a,b) mod min(a,b))
end.
Правда, не пойму, зачем ограничиваться числом 100?
Формула нахождения объема закодированного звука
A = D * i * t * c (D - частота дискретизации, i - глубина бит/разрядность, t - время, c - кол-во каналов)
Приводим единицы измерения
D = 16 кГц = 16000 Гц
t = 60 c
A = D * i * t * c = 16000 * 16 * 60 * 4 = 61440000.0 бит = 7500.0 Kбайт = 7.32421875 Мбайт
Ответ "В"..........................................
var
m,v,s,a,d,mm: real;
begin
writeln ('задай количество миль');
v:=m*7;
writeln (m,'миль=',v,'верст');
s:=v*500;
writeln (m,'миль=',s,'саженей');
a:=s*3;
writeln (m,'миль=',a,'аршинов');
d:=a*28;
writeln (m,'миль=',d,'дюймов');
mm:=d*25.4;
writeln (m,'миль=',mm,'миллиметров');
end.