Задача на qbasic

Друзья прошу помощи вашей так как в qbasic я не бум-бум вот задача.Нужно срочно написать до 18:00 желательно

В массиве, содержащем не более 30 элементов найти сумму элементов, абсолютная величина которых отличается от заданного числа не более чем вдвое. Среди остальных элементов найти минимальный и его номер.

За ранее спасибо.

 

кол-во элементов и сами элементы вводятся вручную?

 

нет...вроде нет...)даже если да то я думаю изменю сам потом все)

 

вечером будет.часов в 10

 

уф...спасибо мен) хотя бы так)

 

сорри я задержался.
вот по тому как я понял условие:

Code:

CLS
INPUT "vvedite zadanoe chislo"; k
IF k=0 then goto w
INPUT "vvedite kol-vo elementov"; n
IF n<1 or n>30 THEN GOTO w
DIM a(n)
FOR i = 1 TO n
INPUT "vvedite  elementi massiva"; a(i)
NEXT

PRINT "massiv"
FOR i = 1 TO n
PRINT a(i)
NEXT

min1 = a(1)
FOR i = 1 TO n
IF a(i) < min1 THEN min1 = a(i): min2 = i
NEXT
PRINT "min "; min1
PRINT "pozitsiya "; min2


sum = 0
FOR i = 1 TO n
IF k >= a(i) \ 2 THEN
sum = sum + a(i)
END IF
NEXT

PRINT "summa"; sum
w: 
print "oshibka"

пысы: за модуль забыл.поглядишь оператор ABS

 

Спасибо,Тему можно закрыть)