; dichiarazione variabili

string str1

string str2[1000]

int dim

STRUCT record

    int p1

    int p2

    real p3

    real p4

    real p5

END_STRUCT

record arrow[2]

dim = sizeof(str1)      ; dim = 128

dim = sizeof(str2)      ; dim = 128*1000

dim = sizeof("1234567")  ; dim = 8

dim = sizeof(record)     ; dim = 32

dim = sizeof(arrow)      ; dim = 32*2

dim = sizeof(1)          ; dim = 4

dim = sizeof(1.1)        ; dim = 8

dim = sizeof(r(1))       ; dim = 4

dim = sizeof(rr(1))      ; dim = 8