From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me X-Spam-Level: *** X-Spam-Status: No, score=3.8 required=5.0 tests=BAYES_00,INVALID_MSGID, RATWARE_MS_HASH,RATWARE_OUTLOOK_NONAME autolearn=no autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103376,6c13cc000274246b,start X-Google-Attributes: gid103376,public From: "Ken" Subject: Please Help. Date: 1997/09/09 Message-ID: <01bcbcde$f8a425c0$ca70fe8c@default>#1/1 X-Deja-AN: 270907477 Organization: The Ohio State University Newsgroups: comp.lang.ada Date: 1997-09-09T00:00:00+00:00 List-Id: with Text_IO; use Text_IO; Procedure GetName is Name : String(1..12); begin Put("Please enter name : "); Get(Name); end GetName; You probably see the problem now. How would you just Get(Name) with different lengths and compares them. Thank you for your help.