0
> One := procedure();
procedure> P2<x,y,z> := ProjectiveSpace(Rationals(),2);
procedure> for i := 1 to 100 do
procedure|for> C_i := Curve(P2, x^3+y^3-i*z^3);
procedure|for> E_i, C_itoE_i := EllipticCurve(C_i);
procedure|for> G, map := MordellWeilGroup(E_i);
procedure|for> print Generators(E_i);
procedure|for> end for;
procedure> end procedure;
> One;
procedure() ... end procedure
이 방법은 다음과 같은 경우에만 "절차() ... 종료 절차"를 인쇄합니다. 몇몇 이유. 나는 솔직히 왜 그런지 모르지만 나는 그것을 고치려고했지만 이전에는 그렇지 않았다. 코드 C_i와 E_i는 for 루프 내부의 유효한 개념이다. 정확한 실수를 말하거나 마그마를 알 필요는 없지만이 문제를 통해 나와 협력 할 수 있다면 (팀워크 같이) 좋을 것입니다.Magma CAS. 이성의 x, y에 대해 x^3 + y^3 = d가되도록 [1..100]의 모든 d를 찾습니다.
당신 맞아. 흠 .. 놀랍습니다. 프로그램 오류를 바로 잡으려고 많은 시간을 보내고 있습니다. 정말 간단합니다. 매우 감사합니다! 어쩌면 다른 사람들은 언젠가이 질문을 유용하게 생각할 것입니다. –