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

berg
Чт авг 01, 2013 7:17 pm
Форум: Maple
Тема: Отбор чисел по заданному условию
Ответы: 9
Просмотры: 3319

Вопрос исчерпан.БЛАГОДАРЮ ВСЕХ ЗА УЧАСТИЕ!
berg
Чт авг 01, 2013 3:13 pm
Форум: Maple
Тема: Отбор чисел по заданному условию
Ответы: 9
Просмотры: 3319

Тысячу раз извиняюсь, господа. В силу своей непроходимой глупости я так и не понял, каким образом в приведённую мной программу вставить команду convert(a, base, 10) , чтобы на экран выводились результаты примерно в таком виде: a, b, c 3, 4, 5 483, 44, 485 49283, 444, 49285 4937283, 4444, 4937285 Мой...
berg
Ср июл 31, 2013 7:29 pm
Форум: Maple
Тема: Отбор чисел по заданному условию
Ответы: 9
Просмотры: 3319

Уважаемый berg! Я полностью ответил на Ваш вопрос, а Вы задаете другой, не связанный с предыдущим: нет массива, отбирать (куда?) числа b, которые состоят только из четверок. Это по меньшей мере не солидно и не производит о Вас положительного впечатления. Вы меня поняли?[/quote] В моей программе на э...
berg
Ср июл 31, 2013 3:58 pm
Форум: Maple
Тема: Отбор чисел по заданному условию
Ответы: 9
Просмотры: 3319

Извините, Markiyan Hirnyk, но я не вижу, как можно применить Ваш совет конкретно, например, в такой задаче: for n from 1 to 100000 do for k from 1 to 100000 do H:=n+2*k-1; a:=H^2-n^2; С:=2*H*n; c:=H^2+n^2; if igcd(a,b,c)=1 then print(a,b,c,n,k); end if; end do:end do; Нужно отобрать все числа b, кот...
berg
Вт июл 30, 2013 8:43 pm
Форум: Maple
Тема: Отбор чисел по заданному условию
Ответы: 9
Просмотры: 3319

Отбор чисел по заданному условию

Подскажите, какой оператор нужно использовать, чтобы из массива результатов отбирались и выводились на экран только числа, состоящие из одинаковых цифр?
berg
Пн июн 24, 2013 9:12 pm
Форум: Maple
Тема: Общая касательная
Ответы: 9
Просмотры: 3651

1) Если то, что Вы написали, Вы просто переписали из каких-то ответов, то почему прямо об этом не написать. 2) Если же Вы сами доказали эти формулы, то объясните публике как Вы их получили. Что, например, означают x и y в этих формулах? Вы плохо обо мне подумали. Данная проблема сначала показалась м...
berg
Пт июн 21, 2013 6:56 pm
Форум: Maple
Тема: Общая касательная
Ответы: 9
Просмотры: 3651

Получить условие существования такой прямой можно по схеме: 1) Находите уравнение прямой, которая касается первой и второй окружностей (таких прямых будет две). 2) То же самое для второй и третьей окружности. 3) Проверяете, что одна из первых двух прямых совпадает с одной из вторых двух прямых. Если...
berg
Пн июн 17, 2013 6:09 pm
Форум: Maple
Тема: Общая касательная
Ответы: 9
Просмотры: 3651

Kitonum, очень благодарен вам за участие. Ваша процедура и удобнее, и компактнее. Но главный мой вопрос остался без ответа. Процедура выдаёт 50 вариантов, но только один из них [1, 4, 4, 5, 5, 8] является искомым результатом: все три окружности лежат на одной прямой, то есть все три окружности имеют...
berg
Вс июн 16, 2013 4:17 pm
Форум: Maple
Тема: Общая касательная
Ответы: 9
Просмотры: 3651

Мне не совсем понятно ваше пояснение. Привожу самодельную программку для решения указанной задачи: > restart;Digits:=10; > print('a','b','c','A','B','C'); > for a from 1 to 5 do > for b from a to 20 do > for c from b to 30 do > A:=a+b; > B:=a+c; > C:=b+c; > p:=(A+B+C)/2; > S1:=(p*(p-A)*(p-B)*(p-C))^...
berg
Сб июн 15, 2013 5:23 pm
Форум: Maple
Тема: Общая касательная
Ответы: 9
Просмотры: 3651

Общая касательная

Решается задача о поиске окружностей с заданным условием. Как средствами Мэпла задать условие, при котором на экран выводятся только окружности, имеющие общую касательную?
Буду благодарен за подсказку.
berg
Пт июн 07, 2013 6:04 pm
Форум: Maple
Тема: Разложение на простейшие дроби
Ответы: 1
Просмотры: 2755

Разложение на простейшие дроби

Я попросил Мэпла разложить на простейшие дроби следующее выражение:(x^2-x+2)/(x^4-5*x^2+4). Получил результат: x^2/(x^4-5*x^2+4)-x/(x^4-5*x^2+4)+2/(x^4-5*x^2+4). Но такое разложение может сделать и дурак. Правильный результат такой: (x^2-x+2)/(x^4-5*x^2+4)=2/(3*x+3)-1/(3*x-3)-2/(3*x+6) +1/(3*x-6). К...
berg
Ср май 29, 2013 3:13 pm
Форум: Maple
Тема: Циклы и последовательности
Ответы: 17
Просмотры: 5963

Извиняюсь, все получилось. Еще раз спасибо.
berg
Ср май 29, 2013 1:19 pm
Форум: Maple
Тема: Циклы и последовательности
Ответы: 17
Просмотры: 5963

Спасибо, Kitonum! Я пытался ввести в процедуру условие igcd(a,b,c)=1, чтобы исключить подобные треугольники, но не получается. Как это можно сделать?
berg
Вт май 28, 2013 4:38 pm
Форум: Maple
Тема: Циклы и последовательности
Ответы: 17
Просмотры: 5963

Kitonum, ваша процедура для троек Пифагора восхищает.
Просто класс! Не могли бы вы подсказать нечто подобное для треугольников Герона? Условием является целочисленность выражения (P*(P-a)*(P-b)*(P-c))^.5. где Р - полупериметр.
berg
Пн апр 15, 2013 7:28 pm
Форум: Maple
Тема: Сумма
Ответы: 10
Просмотры: 3703

Selin, спасибо.
Вторая процедура делает всё правильно.
А вот что считает первая, я так и не понял.