модули для ядра :)

Ах да, вспомнил, в Паскале незя мешать логику и математику...

( a || b ) * ( a && b ) << c
c + !( a || b ) * d

которая ох как нужна при работе с девайсами  

В паскале указатель может ссылаться на не инициализируемую переменную - очень полезно для глюкофф
В Паскале нет арифметики с указателями

Вычисление чисел Фибоначчи, работает раз в 20 быстрее чем любая рекурсия, рекурсия с массивами,....

/* ---------------- */

#include <stdio.h>

void l(unsigned int* n1, unsigned int* n2, int n) {

    unsigned int k1,k2;

    if(n<=1) { *n1=1; *n2=1; return; }
    if(n==2) { *n1=2; *n2=1; return; }
    
    if(n%2) {  
              l(&k1, &k2, (n-1)/2 );
              *n1 = k1 * ( k1 + k2 ) + k1 * k2;
             *n2 = k1*k1 + k2*k2;
    } else {    
             l(&k1, &k2, (n/2)-1);
             *n1 = ( k1+k2 ) * ( k1+k2 ) + k1*k1;
             *n2 = ( k1+k2 ) * k1 + k1*k2;
    }
}

unsigned int f(int n) {

    unsigned int n1, n2;
    l(&n1,&n2,n);
    return n1;
}

void f_print(int n) {
    printf("%dth Fibonacci number is %lu\n",n,f(n));
}

int main(void) {
    f_print(46);
    return 0;
}

/* ---------------- */

Только ради такой красоты, можно выкинуть слово Pascal из мозга,
и поставить фаервол, чтоб не возвращалось.

У Паскаля есть один большой ПЛЮС, - С него ЛЕГКО перейти на С, обратно уже не возможно. :)

А можно на паскале сформировать raw binary с предсказуемой структурой и поведением? А чтоб еще и под не самую простую архитектуру, типа гарвадрца (например, Atmel AVR, у которого флеш для кода и статичных данных, а оператива - только для временных данных и не может выполнять код вообще). Чтоб машинный код, статичные данные и динамичные данные можно было пхнуть в конкретные адреса (возможно, обитающие в разных адресных пространствах) и бинарь сразу мог бы выполняться процом из его флехи, не делая левых обращений куда попало, не ожидая никакого рантайма вообще, не нуждаясь в сложном предварительном загрузчике педалящем формат типа ELF'а и прочая. В свое такое с борланд паскалем это было напряжно. То есть, асм вставки воткнуть - можно, но вот получить гольный бинарь способный работать в нестандартном окружении - уже опаньки. А как с этим сейчас?

Грубо говоря - режим этакого "супер-ассемблера", когда компилер можно детально проинструктировать что и куда необходимо распихать, не геморроясь с выписыванием этого (или как минимум большинства из этого) на ассемблере (тем более что портировать будет сильно проще). В сях то оно с полпинка - язык для системных дел...