4940 INPUT " = ",A$