Т.к. файл весит 20Мбайт ,то нужно поделить его на 2,потому что время передачи мы сократили в 2 раза(со 140 до 70),то есть 20:2 =10.
Ответ:10
Вообще есть способ сразу их сложить, но он крайне сложный потому дабы особо не мучаться, переводим все в десятичную систему 56.74(8) = 46.9375(10), 123.54(16) = 291.328125(10) сложив эти числа получаем =338.265625(10) и последнее что делаем переводим в семиричную 662.16(00523416) часть в скобке это период, число далее тупо повторяется, хотя думаю округлить разрешат до сотых, решал с помощью калькулятора технического, на большинстве есть возможность перевода из одной системы счисления в другую, если знать куда нажимать
var
y: System.uint64; //Большая цЫфра же и положительная
x, i: byte; //Нет смысла большие числа брать слишком, переполнение будет
begin
readln(x); //Принимаем число...
y := 1;
i := 1;
repeat
y *= i; //...и умножаем такое-то количество раз
i += 1;
until (i > x);
if (y = 0) then //Выводим, предусмотрев переполнение
writeln('Слишком большая цЫферка')
else
writeln(y);
<span>end.
</span><span>==========================================
</span><span>Int64 - это то же самое, что LongInt, а Uint64 (unsign long int) - длинное число без знака, при правильном использовании позволяет записывать в переменную числа, в 2 раза превышающие максимум Int64</span>
Var s,p,real;
begin
p:=1;
s:=0;
for var i:=8 to 35 do
if i mod 2 = 0 then begin
s:=s+i;
p:=p*i;
end;
writeln('Сумма четных = ',s,', Произведенние четных = ', p);
end.