Определить, что заданные числа являются координатами точки, лежащей в I или III координатной четверти

INPUT a
IF a<0 OR >9 THEN GOTO 1 
SELECT CASE a
CASE 1
PRINT "один"
`делаете так для отсальный чисел
END SELECT `последняя строка

INPUT a
IF a<0 OR >5 THEN GOTO 1 
SELECT CASE a
CASE 1
PRINT "плохо"
`также с остальными числами
END SELECT `последняя строка

INPUT "vvedite x";x
INPUT "vvedite y";y
IF x>0 AND y>0 THEN PRINT "I"
IF x<0 AND y>0 THEN PRINT "II"
IF x<0 AND y<0 THEN PRINT "III"
IF x>0 AND y<0 THEN PRINT "IV"
`проверка на то лежат ли точки на осях думаю лишней будет

INPUT a 
INPUT b
INPUT c
IF a=b-b*2 OR a=c-c*2 OR b=c-c*2 THEN PRINT "есть" ELSE PRINT "-"

INPUT a 
INPUT b
INPUT c
IF a+b=100 OR a+c=100 OR b+c=100 THEN PRINT "есть" ELSE PRINT "-"

`заполняете массив x(n)(есть тема как это сделать она в важном закреплена)
FOR i=1 TO n
IF x(i)<0 THEN x(i)=0 ELSE IF x(i)>0 THEN x(i)=1 
END IF
NEXT i
FOR i=1 TO n
PRINT x(i)
PRINT
NEXT i

`заполняете массив x(n)(есть тема как это сделать она в важном закреплена)
FOR i=1 TO n
IF x(i) MOD 5=0 THEN x(i)=0
NEXT i
FOR i TO n
s=x(i)^2+x(i+1)^2
NEXT i
PRINT s

`заполняете массив y(n)(есть тема как это сделать она в важном закреплена)
FOR i=1 TO n
IF y(i)<1 AND y(i)>0 THEN PRINT i
PRINT
NEXT i