Borland used the name Object Pascal for the programming language in the first versions of Delphi, but later renamed it to the Delphi programming language.

RF>int  factorial(int n)
RF>{
RF>    int  res;

RF>    if (n==0)
RF>        res = 1;
RF>    else
RF>    {
RF>        res = 1;
RF>        for (i=1; i<=n; i++)  res *= i;
RF>    }
RF>    return  res;
RF>}
RF>

    // long лучше, чем int для данного случая, т.к. число может быть очень большим.
    unsigned long fact( unsigned long value )
    {
        if ( value < 2 )
            return 1;
        
        unsigned long result = 2;
        // Сэкономим пару итераций. 
        for ( unsigned long i = 3; i <= value; i++ )
            result *= i;

        return result;
    }

RF>unsigned long a = 1234567;
RF>char *s;

RF>strcpy( s, "Hello world!" );

RF>printf( "Data: %d %s; address: 0x%x\n", a, s, s );
RF>

RF>unsigned long a = 1234567;
RF>char *s;

RF>s = new char[80]; // выделяю память для строки s, вместо 80 можно поставить любое другое разумное число
RF>strcpy( s, "Hello world!" );

RF>printf( "Data: %ld %s; address: 0x%x\n", a, s, (unsigned int)s ); // %ld--для числа типа long, указатели в C++ имеют тип беззнакового целого числа
RF>

    unsigned long a = 1234567;
    // Если знаем, что строку большего размера записывать не будем, то лучше использовать strdup()
    // для выделения памяти и копирования строки.
    char *s = strdup( "Hello world!" );

    printf( "Data: %lu %s; address: %p\n", a, s, s );
    // Не надо забывать освобождать ресурсы.
    free( s );

    unsigned long a = 1234567;
    // Что здесь происходит, можешь объяснить?
    const char *s = "Hello world!";

    printf( "Data: %lu %s; address: %p\n", a, s, s );