В связи с недавней публикацией программ решения квадратных и кубических уравнений, открыл я школьную тетрадочку и обнаружил в ней две свои программы для МК61/52 (должны пойти и на более ранних моделях). Программы оказались короткими.

Уравнение вида: ax² + bx + c = 0

КВУР МК-61/52 (с использованием регистров)

00.П0 …

Решение невырожденного кубического уравнения с вещественными коэффициентами методом Кардано. Поскольку этот калькулятор не умеет решать такие уравнения из коробки, я посочинял немного. Возможно пригодится кому-либо.

Входные данные - уравнение вида

ax³ + bx² + cx + d = 0

Коэффициенты вводятся по запросу калькулятора c нажатием клавиши R/S

Выходные данные - корни (вещественные …

Поскольку в этом калькуляторе нет автоматического "решателя" квадратных и кубических уравнений, а то что есть - позволяет решать их только численными методами по одному корню за раз, то я решил немного восполнить этот пробел. Может кому-либо пригодится.

Входные данные - уравнение вида

ax² + bx + c = 0

Коэффициенты вводятся по запросу калькулятора …

Сейчас этого калькулятора у меня уже нет, но программы от него остались и может быть кому-либо окажутся полезны.

Возведение в степень по модулю

PROGRAM (D=A\^BmodC)

Program type – MAIN

PRINT “A^B%C”;SLEEP(2)
INPUT A,B,C
D=1
FOR(E=B/2;E≥.5;E=E …

Навеяно книгой Меёса. Написал программу интерполяции во время поездки в маршрутке.

В начале по запросу вводится массив значений функции, взятых через N от 3 до 255 равных интервалов аргумента в виде:

{x₀, x₁,...,x_N-1}

Затем программа запрашивает значение аргумента, любое вещественное в пределах от 0 до (N-1 …

Вариант 1 - Разложение на множители методом перебора

Самый простой метод с точки зрения реализации, целесообразно использовать для чисел размера примерно до 10²⁰ Алгоритм имеет экспоненциальную сложность с точки зрения времени счёта.

ClrText↴
“INPUT NUMBER”↴
?->A:sqrA->B↴
For 2->C To B↴
If Frac(A/C)=0↴
Then A …

В компьютерной безопасности и криптографии важную роль играет «факторизация» целых чисел (разложение на простые множители). Каждое число может быть разложено на простые множители лишь единственным образом (скажем, 15=3*5). Для разложения больших чисел требуются высокопроизводительные вычислительные системы.

Калькулятор HP 50g позволяет при помощи функции ISPRIME? тестировать числа «на простоту …

Две простые программы поиска разложения целых чисел на простые множители. Диапазон 1 <= n <= 999999999. В первой в качестве пробных делителей проверяются числа 2 и все нечетные. Во второй - 2,3 и все числа вида 6*I+1, 6*I-1.

1 программа:

Input N;
If(N==1)Then{Goto 1};
For …