QBASIC Program for find total sum of even number using “do while”

Program for find total sum of even number using “do while” in QBASIC

CLS

PRINT "Total sum of even number between 0 to 10"

x = 2

sum = 0

DO WHILE x <= 10

    sum = sum + x

    x = x + 2

LOOP

PRINT "Total Sum="; sum

END