
( по следам
энциклопедий, лекций и математических форумов )

F1.
Алгоритм Евклида для составления программы на ЭВМ:
1.
Ввести a и b .
2.
Если b = 0 , то Ответ:
а . Конец .
3.
Заменить r := "остаток от деления а на b ", а := b , b := r .
4.
Идти на
2.
Реализация алгоритма в Maple:
> a:=525;b:=231;
for
i from 1 to 1000
do
r:=a mod b:a:=b:b:=r:
if
b=0 then print(a);fi od;
![]()
F2. Формула
Герона для вычисления площади треугольника.
a , b , c -
стороны произвольного треугольника.
![]()
где
F3.
Площадь треугольника по координатам его вершин:
S = 0,5 |(x2 – x1)(y3 – y1)
– (x3 – x1)(y2 – y1)|
F4. Золотое сечение для отрезка
a :
![]()
F5. Формула Эйлера: e2πi = 1
F6. Пифагоровы тройки для уравнения x2 + y2 = z2 :
x = m2 – n2
y = 2mn
z = m2 + n2
F7. Эйлеровы четверки для уравнения x3 + y3 + z3 = w3 :
x = x0 (x0 + y0) m2 + (w02
– z02) mn – y0 (w0
– z0) n2
y = y0 (x0 + y0) m2 - (w02
– z02) mn – x0 (w0
– z0) n2
z = z0 (x0 + y0) m2 - (y02
– x02) mn + w0 (w0
– z0) n2
w = w0 (x0
+ y0) m2 - (y02 – x02)
mn + z0 (w0 – z0) n2
где x0 , y0 , z0 , w0 -
начальные
значения, удовлетворяющие уравнению Эйлера (например : 3 , 4 , 5
, 6 ).
![]()
F8.


F9.
;
F10. Решение диофантова уравнения
ax – by = r :

где
φ(p)
– числовая функция Эйлера [количество чисел от 1 до n , взаимно
простых с n ].
Реализация в Maple:
> with(numtheory):a:=13;b:=36;r:=1;x:=b-b/a*((r*(b mod
a)^(phi(a)-1)) mod a)+r/a;y:=a-(r*(b mod
a)^(phi(a)-1)) mod a;
![]()
> > r:=-1;x:=b-b/a*((r*(b mod a)^(phi(a)-1)) mod a)+r/a;y:=a-(r*(b mod a)^(phi(a)-1)) mod a;
![]()
Эти 10
формул потрясли меня изяществом, красотой и полезностью. Сама вывести смогла
только F3 и F4.

Студентка первого курса МГСУ
Габриель Солодова
Июль 2009