begin var s := Arr(1..1000); var s1: array of integer; var n := 100000000; MillisecondsDelta; loop n do s1 := s[1:11]; MillisecondsDelta.Println; end.