Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 27.08.2018
Сообщений: 24

Возведение в степень - 2

11.11.2018, 12:08. Показов 1031. Ответов 0
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Для заданных A, B и M вычислить AB mod M.

Входные данные

Во входном файле даны три натуральных числа A, B, M (1 ≤ A, B ≤ 1018, 2 ≤ M ≤ 2*109), записанные в одной строке через пробел.

Выходные данные

В выходной файл выведите одно число, равное AB mod M.


Лимит времени 1 секунда

Лимит использования памяти 64 MiB
Входные данные
2 10 1000
Выходные данные
24

Есть код на 73%
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Var a , b, res, c : int64;
Begin
ReadLn(a , b , c);
res := 1;
while (b <> 0) do begin
  if b mod 2 = 0 then begin
    a := (a * a) mod c;
    b := b div 2;
  end else begin
    res := (res * a) mod c;
    b := b - 1;
  end;
end;
WriteLn(res);
End.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
11.11.2018, 12:08
Ответы с готовыми решениями:

Возведение в степень
Вывести на экран числа a в степени -n, a в степени -n+1, a в степени -n+2, a в степени -1 для заданных вещественного a и натурального n

Возведение в степень
Используя только операцию * (умножение), только 1 операцию в выражении, минимум переменных Получить: а) x8 б) x10 в) x15 г) x20

Возведение в степень
есть код: var i, n: integer; var a, y: real; begin writeln('Возведение в степень'); write('Введите основание &gt;&gt;'); ...

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
11.11.2018, 12:08
Помогаю со студенческими работами здесь

Возведение в степень tg
Привет всем. Столкнулся с небольшой проблемкой в Pascal ABC. Мне нужно: {tg}^{2} z/2. Как это записать на паскалевском языке? ...

Возведение в степень
var t1: integer; t2: integer; fi1: double; fi2: double; pn: double; fnp: double; ew1: double; ew2: double; x:longint;

Возведение в степень
Дано действительное число a. Не пользуясь никакими другими арифметическими операциями, кроме умножения, получить: a2, a5 и a17 за шесть...

Возведение в степень
Возведение в степень По трем натуральным числам a, b и m вычислить значение a в степени b mod m. Входные данные Три натуральных...

Быстрое возведение в степень
Вычислите AB mod M (A,B,M ≤ 1018).


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Новые блоги и статьи
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20%
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
Горе от ума
kumehtar 07.04.2026
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
Использование значений реквизитов справочника в документе, с определенными условиями и правами
Maks 07.04.2026
1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .
Доступность команды формы по условию
Maks 07.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .
Уведомление о неверно выбранном значении справочника
Maks 06.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt
8Observer8 05.04.2026
Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .
AkelPad-скрипты, структуры, и немного лирики..
testuser2 05.04.2026
Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru