{ Assignment 1 }
{ Written by Bryan Bridges }

program assign01;

{ Declare Variables }
var
   lastname : string;
   firstname : string;
   class : string;
   assignment_no : integer;
   points : integer;
   due_date : string;
   instructor : string;
   purpose : string;

{ Start Main Program }
begin

{ Prompt and Assign Input To Variables }
   write ('*********************** Title Page Creator ***********************');
   writeln;
   writeln ('Please answer the following questions:');
   write ('Firstname? ');
   readln (firstname);
   write ('Lastname? ');
   readln (lastname);
   write ('Class? (e.g. IMSE-211-02) ');
   readln (class);
   write ('Assignment number? ');
   readln (assignment_no);
   write ('Number of points? ');
   readln (points);
   write ('Due date? (MM-DD-YEAR) ');
   readln (due_date);
   write ('Instructor? ');
   readln (instructor);
   write ('Purpose? ');
   readln (purpose);
   writeln;

{ Display Title Page Output }
   writeln ('Student''s Name:......................................... ',lastname,', ',firstname);
   writeln;
   writeln ('Class:.................................................. ',class);
   writeln;
   writeln ('Assignment No:.......................................... ',assignment_no);
   writeln;
   writeln ('Points:................................................. ',points);
   writeln;
   writeln ('Due Date:............................................... ',due_date);
   writeln;
   writeln ('Instructor:............................................. ',instructor);
   writeln;
   writeln ('Purpose:  ',purpose);

{ End Main Program }
end.