Turbo Pascal : des exemples de

Turbo Pascal: образец испытания кода.

Чтобы облегчить понимание и пересмотр пасхального турбо-языка, мы попытались собрать некоторые коды функций и процедур, используемых в программировании, например:

Дисплей без избыточности

Воздушный корень 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

песочные часы

Введите поиск в файл

Введите таблицу из двух рекурсивных терминалов

.....