Programs to Debug: Number 1

We suggest that you inspect this program to see if you can spot the errors before attempting to compile it in Delphi or Lazarus. Make the necessary changes so that each program will compile and achieve the stated purpose. Our pages on common programming errors may help you.

program Greeting1;
{$APPTYPE CONSOLE}
{This program should give the user a personalized greeting.
There are two deliberate errors.}
Uses
  SysUtils;
var
  Forname : string;
begin
  write1n('Please enter your first name.');
  readln(Forename);
  writeln( 'Hello, ', Forename);
  readln;
end.
Programming - a skill for life!

Spot the deliberate errors