在Fortran中，动态内存分配可以通过ALLOCATE和DEALLOCATE来实现。ALLOCATE用于动态分配内存，而DEALLOCATE用于释放动态分配的内存。

下面是一个简单的示例，演示了如何在Fortran中进行动态内存分配：

program dynamic_memory_allocationimplicit noneinteger, allocatable :: arr(:)integer :: n! 获取用户输入的数组大小print *, "Enter the size of the array:"read *, n! 动态分配内存allocate(arr(n))! 将数组初始化为0arr = 0! 打印数组内容print *, "Array elements:"print *, arr! 释放动态分配的内存deallocate(arr)end program dynamic_memory_allocation

在上面的示例中，用户输入一个数组的大小，然后使用ALLOCATE动态分配内存来创建一个大小为n的整数数组。然后将数组初始化为0，并打印数组的内容。最后使用DEALLOCATE释放动态分配的内存。

值得注意的是，动态内存分配在Fortran中需要谨慎使用，避免内存泄漏和内存溢出的问题。在使用ALLOCATE分配内存后，一定要记得使用DEALLOCATE释放内存，以避免内存泄漏。