| TimurAR | Дата: Четверг, 19.12.2024, 18:26 | Сообщение # 1 |
 Генералиссимус
Группа: Администраторы
Сообщений: 11
Статус: Offline
| Нахождение степени числа по модулю. Можно вводить числа более 200 знаков!
print "d=a^b(mod c)" [l1] input "a=";a input "b=";b input "c=";c a0=a st2=int(log(b)/log(2)) buf=b-2^st2 st2=st2-1 b1=a0 for i=st2 to 0 step (-1) d=2^i k=buf>=d b1=b1^2*a0^k mod c buf=buf-k*d next i print "d=";b1 input "Еще? да-1/нет-2:";e if e=1 then goto [l1] end
|
| |
|
|