Составьте программу для вычисления и запоминания значений функции Zi=(|Xi|+1)^(1/2), где Xi — элементы массива {x1,x2….x20} — QBasic(Бейсик)

DEFDBL A-Z
CLS
DIM X(20), Z(20)
FOR i = 1 TO 20
 X(i) = RND * 10
NEXT
FOR i = 1 TO 20
 Z(i) = SQR(ABS(X(i)) + 1)
NEXT
PRINT TAB(10); "X", , SPACE$(10) + "Z"
FOR i = 1 TO 20
 PRINT X(i), Z(i)
NEXT