Solved

# No one will get this one!!!

Posted on 2000-04-18
152 Views

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
Question by:myoreorex
[X]
###### Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

• Help others & share knowledge
• Earn cash & points
• 2

LVL 16

Accepted Solution

maneshr earned 50 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

ID: 2727978

Michelle
0

Author Comment

ID: 2727989

michelle
0

## Featured Post

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

A year or so back I was asked to have a play with MongoDB; within half an hour I had downloaded (http://www.mongodb.org/downloads),  installed and started the daemon, and had a console window open. After an hour or two of playing at the command …
In the distant past (last year) I hacked together a little toy that would allow a couple of Manager types to query, preview, and extract data from a number of MongoDB instances, to their tool of choice: Excel (http://dilbert.com/strips/comic/2007-08…
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
###### Suggested Courses
Course of the Month9 days, 2 hours left to enroll