Q1. Write a perl script that generates two random numbers between -10 and 90, ca
ID: 3740563 • Letter: Q
Question
Q1. Write a perl script that generates two random numbers between -10 and 90, calculate their average, and if the average is greater than 50 then prints “High Average” else prints “Low Average”. You can use $RANDOM to generate the random numbers.
Q2. Write a perl script that takes one number between -10 and 10 from the user as an argument to the command and checks if a randomly generated number between -10 and 10 matches the sign of the user-supplied number. It prints “Signs Match” or “Signs Different” depending upon the result of the comparison.
Explanation / Answer
ANS 1)
$avg = $ra + $rb;
$avg = $avg / 2;
if( $avg >50 ){
print "High Average. ";
} else {
print "Low Average. ";
}
Ans 2)
print "Enter a number(between -10 and 10): ";
my $user = <STDIN>;
if( $user < 0)
{
if ( $r <0 ){ print "Signs matched ";}
else {print "Signs Different "; }
}
else
{
if ( $r <0 ){ print "Signs Different ";}
else { print "Signs Matched ";}
}
Related Questions
Navigate
Integrity-first tutoring: explanations and feedback only — we do not complete graded work. Learn more.