Тут просто, смотри, цифра 1 означает 2, 2-4, 3-8, 4-16, 5-32 (Число каждый раз увеличивается в 2 раза).Теперь всё складываем, и получаем 0+4+8+64=72. У 8-9 классов похожие задачи есть
<h3>PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
Println(Tan(Exp(4) / 7 + (Pi * (ArcSin(0.27) - Cos(DegToRad(75))))
** (1 / 6)) / (Ln(5) + Log10(7)) * Tan(5 ** 4
- Range(1, 6).Aggregate(1, (p, q)-> p * q)))
end.
<h2>0.630443611995394</h2>
Во вложении приведен результат контрольного решения, выполненный в пакете компьютерной алгебры Maple15 и выведенный с 20 значащими цифрами.
Var x, y, z, k: integer;
begin
readln(x, y, z);
k:=0;
if (x mod 3 = 0) then begin inc(k); writeln(x, ' кратно трем');end;
if(y mod 3 = 0) then begin inc(k); writeln(y, ' кратно трем');end;
if (z mod 3 = 0) then begin inc(k); writeln(z, ' кратно трем'); end;
if (k =0) then writeln('Переменных, кратных трем, не обнаружено!');
end.
32 Кбайт= 2^5*2^10=2^15
128 Мбайт= 2^7*2^10*2^10=2^27
512 Гбайт= 2^9*2^10*2^10*2^10=2^39