Gran Turing-no

%simple stuff, don't piss yourself
%I took the multiple choice optiions straight from the book

var ans: int

put "Turing is:"
put "1. a programming language"
put "2. a type of car"
put "3. a mathematician"
put "4. a machine"
put "5. all of the above"

loop
 get ans
  if ans = 1 then
  put "Right!"
  exit
  elsif ans = 2 then
  put "There's no such thing as a Gran Turing-no."
  elsif ans = 3 then
  put "lolno"
  elsif ans = 4 then
  put "Close, but no quite."
  elsif ans = 5 then
  put "That was so dumb, you don't even get to try again. Go read a book."
  exit
  else
  put "That isn't even an option!"
 end if
end loop