var
n:real;
begin
readln (n);
n:=n*sqrt (2);
writeln (n);
end.
10222₃+1=11000₃
Складываем как обычно. в столбик, помня что 2+1=10₃
Я так понял, что это нужно написать на ЯП Pascal
Вот скриншот и прикрепленный файл с кодом.
Набирать здесь не буду из-за неудобочитаемости.
Работает стабильно, хоть и всегда можно реализовать как-то еще проще :)
upd: обновил фалы, теперь всё написано как надо
1) 100*2^13 : 3*2^9 = (25:3)*2^6 секунд
2) 768 *(25:3) *2^6 = 256*25*2^6 =25*2^14 бит = 25*2 Кбайта= 50 Кбайт
ИЛИ:
1) 1536 : 768 = 2 ( скорость уменьшилась в 2 раза)
2) 100 :2 = 50 Кбайт
Ответ 50