Program Main
Implicit None
Integer, Parameter :: iwp = SELECTED_Real_KIND(15)
Integer, allocatable :: Num(:)
Num(1)=1
......
End Program Main
Когда я использую allocatable для определения пустого массива 'num', а затем запускаю программу, она выявляет эту ошибку, как показано ниже.
(1) «Исключение первого шанса по адресу 0x00B21147 в Index.exe: 0xC0000005: место записи нарушения прав доступа 0x00000004»
(2) «Если есть обработчик для этого исключения, программа может быть безопасно продолжена»