Программа

K=7                'Определение количества элементов в массиве
DIM D(K)           'Исходный массив
DIM S(K)           'Получаемый массив


'Ввод исходного массива:
CLS                'Очистка экрана
FOR i%=1 TO K      'Цикл ввода массива
  PRINT "Введите элемент D[";i%;"] "; 'Вывод приглашения ввести элемент массива
  INPUT ,D[i%]                       'Ввод элемента массива
NEXT i%
CLS                'Очистка экрана
INPUT "Введите V ",V  'Ввод V
CLS                   'Очистка экрана
PRINT "V=";V          'Вывод V
PRINT                 'Пропуск строки
'Вывод исходного массива:
PRINT "Исходный массив:"         'Вывод заголовка
FOR i%=1 TO K                    'Цикл вывода массива
  PRINT "D[";i%;"] =";D[i%]         'Ввод элемента массива
NEXT i%
PRINT                 'Пропуск строки
'Обработка массива:
FOR i%=1 TO K      'Цикл обработки массива
  S[i%]=D[i%]+V^2    'Вычисление элемента массива
NEXT i%
'Вывод полученного массива:
PRINT "Полученный массив:"         'Вывод заголовка
FOR i%=1 TO K                      'Цикл вывода массива
  PRINT "S[";i%;"] =";S[i%]          'Вывод элемента массива
NEXT i%
'Вычисление C:
C=0                'Обнуление суммы
FOR i%=2 TO K STEP 2       'Цикл обработки массивов
  C=C+(D[i%]-S[i%])           'Набор суммы
NEXT i%
PRINT                 'Пропуск строки
PRINT "C=";C          'Вывод C
END