[Kaifolom]

Помогите плиз кто знает замутить код алгоритма шифрования Диффи-Хеллмана. (Ну или хотя бы подскажите как замутить переключение между тремя абонентами в Delphi с помощью объекта RadioButton так что бы при выборе двух из них их имена отображались в 2-x Label'ax. И ещё, как возвести в степень с помощью цикла (или ещё как). Буду очень благодарен если поможете

[dron-s]

И ещё, как возвести в степень с помощью цикла

это гемор
используй модуль Math

[Kaifolom]

как на Дельфи написать такую формулу:
y=a^x*mod*p

[Kaifolom]

Сам алгоритм примерно следущий:Каждый из абонентов выбирает своё секретное число(x) и вычисляет открытый
ключ(y) по формуле y(для абонента а)=a^x(абонента а)*mod*p , Далее вычисляется шифр Z по формуле
Z(для абонента a)=y(абонента b)^x(абонента a)*mod*p и наоборот...
Помогите написать эти формулы.