program {
  string param;
  write ("Specify string>> ");  read (param);
  if (param >= "g" and param < "h") write (param," starts with 'g' ");
    else write (param + " does not start with 'g' ");
}