Найдено 9 результатов

Сергей46
Вт окт 23, 2012 4:30 pm
Форум: Maple
Тема: Как оперировать знаками действий?
Ответы: 11
Просмотры: 7645

Для вашего случая можно даже проще; > P := proc(x, y, z, t, h, Res) local a, b, c, n, k; a := ["+", "-", "*", "^", "/"]; n := rand(1..4); for k to 10^6 do b := cat(convert(x, string), a[n()], convert(y, string), a[n()], convert(z, string), a[n()], co...
Сергей46
Вт окт 23, 2012 3:42 pm
Форум: Maple
Тема: Как оперировать знаками действий?
Ответы: 11
Просмотры: 7645

Из-за отсутствия времени привожу набросок одной идеи, решающей вашу задачу. Правда, для получения нужного результата можно ждать очень долго, хотя идея работает, если решение существует, ибо не всегда такого типа задачи имеют решение. Данная процедура допускает различные интересные модификации и обо...
Сергей46
Пн окт 15, 2012 8:42 pm
Форум: Maple
Тема: Количество повторяющихся чисел в списке
Ответы: 13
Просмотры: 4307

То Markiyan Hirnyk: А привел я лишь в порядке общей информированности. Если не интересно (будем надеяться), пропустите. То Berg: Можно и по второму элементу (несложно усмотреть принцип) > F := (x, y) -> evalb(z(x[2], y[2])): z:=`<`: sort(L, F); [[67, 1], [19, 1], [4, 1], [1, 1], [32, 1], [321, 1], [...
Сергей46
Пн окт 15, 2012 7:54 pm
Форум: Maple
Тема: Количество повторяющихся чисел в списке
Ответы: 13
Просмотры: 4307

Уважаемый Berg , за “студента” не извиняюсь, ибо вы сами себя так обозвали. С остальным понятно. Рад, что в таком возрасте у вас такие серьезные интересы. Именно из уважения к вашкму возрасту решил еще раз ответить. Уважаемый Markiyan Hirnyk! Я привел лишь основу, на базе которой можно получать реше...
Сергей46
Пн окт 15, 2012 10:46 am
Форум: Maple
Тема: Количество повторяющихся чисел в списке
Ответы: 13
Просмотры: 4307

Уважаемый berg , обычно я не помогаю студентам с решением примитивных примеров. Но тут вопрос несколько сложнее и поучительнее. Г-н Selin привел довольно эффективное решение для вашего примера при условии получения лишь кратных значений списка (его совет домыслить результата не возымел); именно это ...
Сергей46
Ср авг 29, 2012 10:11 am
Форум: Mathematica
Тема: Как очистить память?
Ответы: 9
Просмотры: 11623

Конечно есть, как и у всех достаточно развитых систем. см. ниже In[1]:= x = 56; y := 78; {x, y} Out[1]= {56, 78} In[2]:= Exit[] Out[1]= {x, y} In[1]:= {x, y} Out[1]= {x, y} In[2]:= x = 56; y := 78; {x, y} Out[2]= {56, 78} In[3]:= Quit[] In[1]:= {x, y} Out[1]= {x, y} Однако все зависит от того, что в...
Сергей46
Вт авг 28, 2012 1:25 pm
Форум: Mathematica
Тема: Как очистить память?
Ответы: 9
Просмотры: 11623

Если вы аккумулировали ненужные вам значения в списке, то можно воспользоваться простой функцией Аладьева . Вызов ClearValues[x] возвращает пустой список, одновременно удаляя из текущего сеанса все переменные, имеющие значения из списка x. Привожу пример из конспекта мастер-класса автора. По моей ин...
Сергей46
Вс авг 26, 2012 9:34 pm
Форум: Mathematica
Тема: Как очистить память?
Ответы: 9
Просмотры: 11623

In[5]:= y = {x, z}
Out[5]= {x, z}
In[6]:= Definition[y]
Out[6]= Null
In[7]:= Clear[y]
In[8]:= Definition[y]
Out[8]= Null
In[9]:= y = {x, z}
Out[9]= {x, z}
In[10]:= Remove[y]
In[11]:= Definition[y]
Out[11]= Null
In[12]:= a = 56; b = Clear[a]; c = a =.; b === c
Out[12]= True
Сергей46
Вс авг 26, 2012 3:59 pm
Форум: Mathematica
Тема: Как очистить память?
Ответы: 9
Просмотры: 11623

Вызов функции ClearSystemCache[] должен работать, проверено. Используйте Remove, предварительно отменив атрибут Protected. Средства управления памятью здесь более эффективны, чем в Maple. Проверено неоднократно.