Ну тут всё надо перемножить и перевести в кБ.
30 с * 16000 Гц * 16 бит = 7 680 000 бит ( сек * 1/сек * бит = бит)
7 680 000 / 8 = 960 000 Байт (1 Байт = 8 бит)
960 000 / 1024 = 937,5 кБайт (1 кБайт = 1024 Байт, т.е. 2 в степени 10)
<span>
</span>
предлагаю решение на Паскале
var n: integer;
begin
read (n);
if (n mod 5)=0 then n:=n*4
else
n:=n-25;
writeln ('n=',n);
end.