Оттуда:
Сложение двух чисел тривиально — достаточно поставить 1 между ними и стереть крайний правый символ у Q. Программа вычитания состоит из последовательного затирания крайних левых меток у Q и правых у P:
1. 0 - стираем левый символ у Q
2. →
3. ? 5, 4
4. Stop - стоп если затерли Q=0
5. ←
6. ? 7, 5 - цикл поиска P
7. 0 - стираем правый символ у P
8. →
9. ? 1, 8 - ищем Q
Отметим, что номер команды перехода не указывается, если переход происходит на следующую по порядку строку (для наглядности текста) . В 6-ой строке возможно зацикливание, если Q > P (вы можете добавить проверку сами)
<span>****только вам нужно сдвинуться в начало строки и учесть пустую клетку-т. е. еще один проскок каретки</span>
Конкретно вопрос не сформулирован. Но если предположить что вопрос в том, что определить к какому типу памяти отнести внутреннюю человеческую, то можно провести следующие рассуждения.
Вопрос этот очень сложный и медики и ученые в полной мере ответить на него не смогут, но можно кое что сказать на основе своих собственных наблюдений.
Во первых, в человеческой голове есть память, которую можно условно назвать "оперативная", то есть такая память, которая содержит информацию о текущих событиях, в течение дня, за тем когда проходит сон "перезагрузка", часть информации стирается, часть передается в другую часть мозга - "постоянную память". При чем в постоянной памяти постепенно тоже происходит обновление информации, когда информация актуальная постоянно обновляется, а та информация, которая много времени не используется стирается.
Сон тоже невозможно назвать однозначно "перезагрузкой", сон - процесс намного более сложный. Во время сна происходит не просто передача и стирание информации, а происходит сложная обработка, в том числе анализ данных, полученных за день и выполнение выводов, которые человек не способен получить сознательно.
"утро вечера мудренее" это как раз именно об этом.
Достоверность, полнота, точность, актуальность, полезность, ценность, своевременность, понятность, доступность, краткость.
<u>PascalABC.NET 3.4.0, сборка 1672 от 10.06.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var eps:=1e-3; // точность
var (b,r):=ReadReal2('Введите сторону треугольника и радиус:');
if Abs(r-b*Sqrt(3)/6)<=eps then Writeln('Окружность можно вписать')
else Writeln('Окружность вписать нельзя')
end.
<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 значащими цифрами.