Вывести все целые числа, расположенные между данными числами - QBasic

Формулировка задачи:

1. Даны два целых числа А и В (А<B).Вывести все целые числа, расположенные между данными числами (включая сами числа) в порядке их возрастания, а также количество N этих чисел.

Решение задачи: «Вывести все целые числа, расположенные между данными числами»

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

1 CLS
PRINT "A<B"
INPUT a, b
IF a > b THEN 1
FOR i = a TO b
PRINT i;
n = n + 1
NEXT i
PRINT
PRINT "Kolichestvo="; n

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

CLS — очистка экрана
PRINT A<B — вывод строки A<B
INPUT a, b — ввод двух чисел (a и b) с клавиатуры
IF a > b THEN 1 - проверка условия, если a больше b, то переход к первому шагу (1)
FOR i = a TO b — начало цикла, который выполняет следующие действия:
1. PRINT i — вывод текущего значения переменной i
2. n = n + 1 - увеличение значения переменной n на единицу
3. NEXT i — переход к следующему шагу цикла
PRINT — вывод символа новой строки
PRINT Kolichestvo=; n — вывод строки Kolichestvo= и значения переменной n
END — конец программы