Готовые программы Free Pascal. Примеры, задачи.

Составить программу , используя интерполяционный многочлен Ньютона

Последовательность символов в строке (char)

Вывод строки в обратном порядке через рекурсивную процедуру

Факториал факториала. Написать программу для вычисления

Процедура: вычисление произведения отрицательных элементов массива

Поиск подстроки в строке (алгоритм Кнута-Морриса-Пратта)

Олимпиадная задача "Котлеты"

Правильно ли работает программа? Среднее арифметическое

Вывести количество чисел: отрицательных, нулей, принадлежащих диапазону [1..1024]

Повторить ввод при неверных значениях

Работа с текстом, как с массивом

Проверить, делится ли заданное число Фибоначчи на 7 без остатка

Линейный алгоритм: найти периметр и площадь правильного шестиугольника по радиусу описанной окружности

Определить, принадлежит ли точка заштрихованной области

Закрывается консоль, несмотря на readln();

Расчет заработной платы.

Разработать программу для ввода последовательности из n <= 255 вещественных чисел

Создание динамического массива

Окружность задается радиусом и координатами центра

Как определить множество включающее в себя др множества?

Как вывести максимальный элемент списка

Разбить код на функции

Найти сумму положительных (SP) и количество отрицательных (PO) элементов массива

Определить максимальную и минимальную цифры числа

Вывести на экран команды победителя и команды аутсайдера

Чтение с экрана типа boolean

Вычислить сумму по формуле

Задано натуральное число n. Необходимо перевести его в k-ичную систему счисления

Выдать все четные числа от 0 до 10000, если х = 0; иначе выдать x^5

Разбить на процедуры

Работа с файлами

Вычислить сумму квадратов элементов матрицы, принадлежащих промежутку (E,F]

Получить элементы вектора x, равные сумме чётных элементов каждой строки

Подпрограмма: в строке символов заменить каждую из групп стоящих рядом точек многоточием

Readkey без ожидания

Проверять, является ли строка палиндромом

Вычислить значение выражения

Создание и корректировка файла, содержащего сведения об абитуриентах

Найти сумму длин диагоналей параллелограмма

Заполнить массив так, чтобы в каждой строке и каждом столбце не было повторяющихся элементов

Вывести матрицу спиралью

Проверка вводимых значений

Найти длину k и вывести на печать самую длинную "пилообразную" последовательность

Перевести код с C++

Удалить все лишние пробелы, оставив по одному между словами

Определить, можно ли расплатиться за покупку без сдачи

Скрыть вводимый текст с клавиатуры

Случайным образом заполнить одномерный массив целых чисел А [i], где i = 1, 2, ., n. Вывести этот массив

Найти произведение 12-ти членов ряда , общий член которого an=1/(3n-2)(3n+1)

Рисование звёздочками букв z