begin
  var a: array[,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,] of byte;//минимум 32 запятых
end.