Maple - Помощь студентам

Neznau · 22.02.2010, 15:19

Пожалуйста, если кто-то знает программу Maple, помогите...
Реализовать (p+1)-алгоритм для разложения на множители чисел, содержащих 2 простых сомножителя порядка 10^7.

Neznau · 28.02.2010, 12:48

Помогите найти ошибку в задаче, пож-та.

> with(numtheory):
> a:=2;
> b:=4;
> n:=143;
> kol:=pi(b);
> mas:=array(1..kol);
> k:=1;
> for i from 1 to kol do
> mas[i]:=ithprime(i);
> q:=mas[i];
> while mas[i]<=b do mas[i]:=mas[i]*q od;
> mas[i]:=mas[i]/q;
> k:=k*mas[i];
> od:
> k:=k mod n;
> z:=(a^k+1) mod n;
> p:=igcd(z,n);
> p2:=n/p;

22.02.2010, 15:19	#1
Neznau Пользователь Регистрация: 17.05.2008 Сообщений: 16	Maple Пожалуйста, если кто-то знает программу Maple, помогите... Реализовать (p+1)-алгоритм для разложения на множители чисел, содержащих 2 простых сомножителя порядка 10^7.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
RSA алгоритм в Maple.	pokerBORODA	Фриланс	2	17.02.2010 19:06
Программирование на Maple	thebestneo	Фриланс	1	16.02.2010 13:39
Програмка на интегрирование в Maple	Almazik	Помощь студентам	1	12.01.2010 15:18
Проблема с Maple 11	MaTBeu	Софт	0	03.11.2008 19:49

28.02.2010, 12:48	#2
Neznau Пользователь Регистрация: 17.05.2008 Сообщений: 16	Помогите найти ошибку в задаче, пож-та. > with(numtheory): > a:=2; > b:=4; > n:=143; > kol:=pi(b); > mas:=array(1..kol); > k:=1; > for i from 1 to kol do > mas[i]:=ithprime(i); > q:=mas[i]; > while mas[i]<=b do mas[i]:=mas[i]q od; > mas[i]:=mas[i]/q; > k:=kmas[i]; > od: > k:=k mod n; > z:=(a^k+1) mod n; > p:=igcd(z,n); > p2:=n/p;