Home QBASIC C Java HTML
  • More Courses
  • MCQs
  • Blog Download
  • Tools
  • Contact

    QBASIC program to Print the Perfect Square numbers from 1 to 100.

    Posted on 2021-01-05

    In mathematics, a square number or perfect square is an integer that is the square of an integer. In other words, it is the product of some integer with itself. For example, 9 is a square number, since it equals 32 and can be written as 3 × 3.

    In QBASIC to find the square number is very easy. Because we have a mathematicl library function called SQR. Lets see the program to print the kperfect square numbers from 1 to 100. 

    CLS
    FOR i = 1 TO 100
        n = SQR(i)
        IF n = INT(n) THEN
            PRINT n * n;
        END IF
    NEXT i
    END
    

    Output

    1  4  9  16  25  36  49  64  81  100
    

     

    Using SUB ... END SUB

    DECLARE SUB square()
    CLS
    CALL square
    END
    
    SUB square ()
        FOR i = 1 TO 100
            n = SQR(i)
            IF n = INT(n) THEN
                PRINT n * n;
            END IF
        NEXT i
    END SUB
    

     

    Using Function ... END FUNCTION

     
    DECLARE FUNCTION square()
    CLS
    sq = square
    END
    
    FUNCTION square ()
        FOR i = 1 TO 100
            n = SQR(i)
            IF n = INT(n) THEN
                PRINT n * n;
            END IF
        NEXT i
    END FUNCTION
    

    493