Составьте программу с циклом FOR, выводящую на экран сумму четных чисел от 1 до 10 (Бейсик) - QBasic

PRINT 2+4+6+8+10 
 
x=0 
FOR A=2 TO a=10 STEP 2 
x=x+a 
NEXT A 
PRINT x

Подскажите правильно ли я составил?

Листинг программы

DEFINT A-Z
CLS
FOR I=0 TO 10
  IF I MOD 2=1 THEN X=X+ I
NEXT I
PRINT X
END

Объяснение кода листинга программы

DEFINT A-Z - данная строка кода используется для определения диапазона букв от A до Z, который будет использоваться в операторе FOR.
CLS - данная команда очищает экран, удаляя все предыдущие выводимые на экран данные.
FOR I=0 TO 10 - оператор FOR используется для выполнения цикла 11 раз, где переменная I принимает значения от 0 до 10.
IF I MOD 2=1 THEN X=X+ I - данная конструкция проверяет, является ли значение переменной I нечетным числом. Если это так, то значение переменной I добавляется к значению переменной X.
NEXT I - данная команда выполняет переход к следующей итерации цикла.
PRINT X - данная команда выводит значение переменной X на экран.
END - данная команда обозначает конец программы.