Исправление yvv, 14.10.21 19:26 (текущая версия) :
Зачем ви так делаете? Фортран, он совсем другой же. Вот как надо:
program biggest real :: a(100) print*, maxval(a) end program biggest
Исходная версия yvv, 14.10.21 19:22:
Зачем ви так делаете? Фортран, он совсем другой же.