A,D:array[1…100