Вычислить произведение P=S1*S2 суммы S1 элементов массива x[i]-тое и суммы S2 элементов массива y[i]-тое, i=1,2,3 меньших 5- QBasic(Бейсик)

DIM x(3)
DIM y(3)
FOR i = 1 TO 3
    PRINT x(i);
NEXT
PRINT
FOR i = 1 TO 3
    PRINT y(i);
NEXT
PRINT
FOR i = 1 TO 3
    IF x(i) < 5 THEN S1 = S1 + x(i)
NEXT
PRINT
FOR i = 1 TO 3
    IF y(i) < 5 THEN S2 = S2 + y(i)
NEXT
PRINT S1 * S2