Improve company productivity with a Business Account.Sign Up

x
?
Solved

No one will get this one!!!

Posted on 2000-04-18
3
Medium Priority
?
160 Views
Last Modified: 2010-03-05

             
3 Write a program to solve the following problem.  Use an array to model the
  safety deposit box vault.  Initialize the boxes as described below.

              ===========================================
                         SAFETY DEPOSIT BOXES
              ===========================================

  There has been a run at the local savings and loan.  One thousand depositors
  have lined up in a very long vault with 1000 _CLOSED_ safety deposit boxes.
  One by one the depositors run through the vault.  The first depositor opens
  every box.  The second depositor goes to every second box and closes it.  
  The third depositor goes to every third box and changes it (if open, closes
  it; if closed, open it).  In a similiar manner, every fourth, fifth, sixth,
  ... depositor changes every fourth, fifth, sixth, ... box.  After all 1000
  depositors have passed through the vault, which boxes are left open?

0
Comment
Question by:myoreorex
  • 2
3 Comments
 
LVL 16

Accepted Solution

by:
maneshr earned 200 total points
ID: 2727961
try this..........

the results are really amazing!! all the boxes that are open are squares of numbers!!
==================amazin.pl

#!/usr/local/bin/perl

##  initalize all the boxes
##  0=closed, 1=open
foreach (0..999){
  $box[$_]=0;
}

foreach $user (1..1000){  ##  For every investor..
  print $user,"\n";
  foreach($[ .. $#box){
    $ctr=$_+1;
    if (($ctr % $user) == 0){
    print "\t",$ctr,"\n";
      if ($box[$_]){
        $box[$_]=0;
      }else{
        $box[$_]=1;
      }
    }
  }
}

print "box #'s that are open \n";
foreach($[ .. $#box){
  if ($box[$_]){
    $box_no=$_+1;
    print $box_no,"\n";
  }
}
0
 

Author Comment

by:myoreorex
ID: 2727978
Thanks...I forgot about the foreach..........

Michelle
0
 

Author Comment

by:myoreorex
ID: 2727989
Thanks...I forgot about the foreach!!!


michelle
0

Featured Post

Free Tool: ZipGrep

ZipGrep is a utility that can list and search zip (.war, .ear, .jar, etc) archives for text patterns, without the need to extract the archive's contents.

One of a set of tools we're offering as a way to say thank you for being a part of the community.

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Checking the Alert Log in AWS RDS Oracle can be a pain through their user interface.  I made a script to download the Alert Log, look for errors, and email me the trace files.  In this article I'll describe what I did and share my script.
Article by: Tammy
MySQLTuner is a script written in Perl that allows you to review a MySQL installation quickly and make adjustments to increase performance and stability. The current configuration variables and status data is retrieved and presented in a brief forma…
Explain concepts important to validation of email addresses with regular expressions. Applies to most languages/tools that uses regular expressions. Consider email address RFCs: Look at HTML5 form input element (with type=email) regex pattern: T…
Six Sigma Control Plans

595 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question