CPS 10 (Ramm)			Spring 1995		     8 February 1995
				  Quiz #4

Name _______________________					Section _____
(Note: Getting your Name and Section right is worth one point.)

A. Write a complete Pascal program that reads in a positive integer N, and
then prints the integers from 1 up to N+3.  For example, if your program
reads in a 2, it should print out the following:

  1
  2 
  3
  4
  5










B. What OUTPUT will the following programs print?

program one;	      (Format is important: use underscores _ to mark spaces)
var		
    r, x:real;			             OUTPUT (lined up with writeln's)
begin
r := 2.0;
x := 7.0;
while r <= 6.0 do
    begin
    x := x + r;
    r := r + 2.0;
    end;
writeln(r:6:2, x:6:2);
readln;
end.


program two;
var
    i: integer;
    c: string;
begin
i := 1;
c := 'X';
while i < 4 do
    begin
    c := '\' + c + '$';
    i := i + 1;
    end;
writeln(c);
readln;
end.