Answer:
Here's the algorithm to calculate the perimeter of a rectangular object:
Read the length and breadth of the rectangle from the user.
Calculate the perimeter of the rectangle using the formula: perimeter = 2 * (length + breadth).
Display the calculated perimeter on the screen.
Here's the QBasic program based on this algorithm
' QBasic program to calculate perimeter of a rectangle
CLS ' clear screen
' Read the length and breadth of the rectangle
INPUT "Enter length of rectangle: ", length
INPUT "Enter breadth of rectangle: ", breadth
' Calculate the perimeter of the rectangle
perimeter = 2 * (length + breadth)
' Display the perimeter of the rectangle
PRINT "The perimeter of the rectangle is "; perimeter
END ' end program
In this program, we first clear the screen using the CLS command. Then, we use the INPUT statement to read the length and breadth of the rectangle from the user. We calculate the perimeter using the formula perimeter = 2 * (length + breadth) and store the result in the variable perimeter. Finally, we display the calculated perimeter using the PRINT statement. The program ends with the END statement.
Step-by-step explanation: