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

disel

1
2
3
4
5
6
7
8
9
10
11
12
13
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

Тестирование выполнено в программе QB64 ( Скачать )

Похожие записи/страницы:

Leave a Comment