Найти сумму N первых четных натуральных чисел в Qbasic.

Предыдущий
вопрос Следующий
вопрос

Для того, чтобы найти сумму N первых четных натуральных чисел в QBasic, можно воспользоваться следующим кодом:

CLS
INPUT "Введите количество четных чисел: ", N
total = 0
count = 0
num = 2
DO WHILE count < N
total = total + num
num = num + 2
count = count + 1
LOOP
PRINT "Сумма первых "; N; " четных чисел равна: "; total

При запуске этой программы пользователю будет предложено ввести количество четных чисел (N), а затем программа вычислит и выведет сумму N первых четных натуральных чисел.