/*== Ex19 動的メモリ割り当て ========*/
#include <stdlib.h>
#include "pseudo.h"
/*===================================*/
#define  aSIZE   (1000+2)
/*===================================*/
FUNCTION  Main()
VARIABLE
    PtrINT  a, b;
    INT     i, n, nA, step;
BEGIN
    nA= aSIZE; step= nA/10;
    FOR ( n, 1, 100)
        MemAlloc( INT, nA, a);

        FORINC( i, 1, nA-1, step)
            a[i]= i;
        ENDFOR

        NewAlloc( INT, nA, b);

        FORINC( i, 1, nA-1, step)
            b[i]= i;
        ENDFOR

        /*
        Free( b);
        Free( a);
        */
    ENDFOR
    WriteInt(2*4*100*nA);
    WriteLine("バイトのメモリ確保に成功！");
ENDFUNC
/*===================================*/