Turbo Pascal : des exemples de codes на компьютер

Чтобы облегчить понимание и пересмотр пасхального турбо-языка, мы попытались собрать некоторые коды функций и процедур, используемых в программировании, например:
Дисплей без избыточности
Воздушный корень x по методу [a, b] 1 прямоугольник
Воздушный корень x на трапецеидальном методе [a, b] 1
Воздушный корень x по методу [a, b] 2 прямоугольника
Воздушный корень x на [a, b] 2 трапециевидном методе
Воздушный корень x по методу [a, b] 3 прямоугольника
Воздушный корень x на [a, b] 3 трапециевидном методе
Площадь треугольника
Анаграммы
Другая база 10
База 10 к другой Рекурсивная основа
Основание 10 - основание 2, 8, 16
Основание 2 - основание 8, 16
База 8, 16 - base2
Расчет Pi
Расчет Sinus
Вычисление x выставляет n Рекурсивный
калькулятор
Аэрированная цепь
Отличная цепочка
Цепочка дублирована
Крошечная цепь для прямой цепи
Обратные цепи
Номер письма
Итеративный рейтинг
Рекурсивный рейтинг
сочетание
Рекурсивная комбинация
Сравнение двух целых чисел
Бинарное преобразование из одной двоичной базы в другую двоичную базу
Копировать цепочку
Шифрование предложения
Дата в письме
Делимость на 11
Делимость на 13
Делимость на 2
Делимость на 3
Делимость на 4
Делимость на 5
Делимость на 6
Делимость на 7
Делимость на 9
Взорвать картину
Уравнение первой степени
Уравнение второй степени
Дополнительное пространство
экспоненциальный
Prime Factor
Итерационные факторы
Первые факторы Итерационные без диаграммы
Рекурсивные первичные факторы
Рекурсивные сырьевые факторы без таблицы
Рекурсивный фактор
Факториальный рекурсивный типизированный метод
Частота персонажа
Большая сумма картины
1-е неравенство
Вставка позиции в таблицу
Пересечение двух картин
Обратная рекурсивная строка
Инвертировать таблицу
Kaprekar
Самая большая цепочка палиндрома
Примерный квадратный корень
Кубический корень действительного числа R
День даты
назавтра
Числа целого числа и которые являются дивизорами
Матричное добавление двух матриц A и B
Матрица отображает мин и макс.
Матрица строит и отображает унитарную матрицу
Матрица ставит диагональ нулю
Матричное умножение двух матриц A и B
Матричное умножение на вещественное X
Матричная транспозиция maTrice
Макс. Таблицы из двух итерационных терминалов
Макс таблицы двух рекурсивных терминалов
Макс. Массива размера n Итеративный
Макс. Массива размера n Рекурсивный
Максимум три целых числа
Максимальная итеративная матрица
Максимальная рекурсивная матрица
Упоминание высокого
Минимальная таблица размера n Итеративная
Min массива размера n Рекурсивный
Мин таблицы из двух итерационных терминалов
Мин таблицы двух рекурсивных терминалов
Минимум двух целых чисел
Минимальное и максимальное значение таблицы
Минимум Максимум двух целых чисел
Средняя оценка
Среднее значение между двумя рекурсивными терминалами
Среднее значение между двумя итерационными терминалами
Среднее и ранг класса
Средняя итеративная матрица
Средняя рекурсивная матрица
Рекурсивная средняя вкладка n
Рекурсивная средняя вкладка deb end
Средняя итеративная таблица
Кубический номер
Количество дней в месяц
Идеальное число
Номер римского до десятичного числа
КРУГЛЫЙ номер
Друзья
Первые номера
Появление персонажа
Появление слова
палиндром
Рекурсивный палиндром
Идеальный рекурсивный метод
соотношение
PGCD Euclide
Дифференциальный GCD
Рекурсивный метод Pgcd 1
Метод Pgcd Рекурсивный 2
Метод Pgcd Рекурсивный 3
Положение цепочки
LCM
PPCM и GCD
Рекурсивный PPCM
Сначала между двумя итерационными терминалами
сначала между двумя рекурсивными терминалами
Первый рекурсивный метод
Мощность X по Y
пирамида
Пифагор
Корневая площадь
Отложите картину
Дихотомические исследования в таблице
Итерационный дихотомический поиск
Рекурсивный дихотомический поиск
Поиск элемента большинства
Последовательный поиск в таблицах
Итеративный последовательный поиск
Рекурсивный последовательный поиск
Группировать таблицу
Отменить предложение
Решите уравнение Cos (x) - x = 0
Решите уравнение cos (x) = x
Решите уравнение корня x + 1
песочные часы
Введите поиск в файл
Введите таблицу из двух рекурсивных терминалов
.....

Quelques fautes ont été corrigées.