let type array_int = array of int var shamiq : array_int := new array_int[10] of 15 var i : int := 2 in shamiq[0] := 0; shamiq[1] := 1; while i < 10 do shamiq[i] := shamiq[i - 1] + shamiq[i - 2] end