g77 INOUT.f 为什么编译不过去？

dyte100

INOUT.f源码如下：
PROGRAM INOUT
C
C This program reads in and prints out a name
C
CHARACTER NAME*20
PRINT *,'  Type in your name, up to 20 characters'
PRINT *,'  enclosed in quotes '
READ *,NAME
PRINT *,NAME
END