Даны a и d целые вывести разность чисел

Решение на бейсике.

cls
print "Введите значение А: ";
input A%

print "Введите значение D";
input D%

print "Разность значений"; A% - D%
end