Лабораторный практикум по информатике. Гурьяшова Р.Н - 139 стр.

UptoLike

139
Результаты работы программы приведены в макете печати.
Задание чисел из диапазона [A;B] на языке Basic
осуществляется по формуле (для целых чисел):
INT(A + (B - A) · RND)
Листинг Basic-программы
Программный код
Ввод-вывод матрицы A Ввод-вывод массива X,Y
CLS
N = 3
RANDOMIZE TIMER
DIM A(N,N
)
PRINT "
МАТРИЦА А"
FOR I = 1 TO N
FOR J = 1 TO N
A(I,J)=INT(–10 + 20*RND)
PRINT USING "##",A(I,J);
NEXT J
PRINT
' Пропуск строки
NEXT I
END
CLS
N = 3
RANDOMIZE TIMER
DIM X(N),Y(N)
PRINT TAB(3); " X Y"
FOR I = 1 TO N
X(I)=INT(–10 + 20*RND)
Y(I)=INT(–10 + 20*RND)
PRINT USING "##",X(I);
PRINT USING "##",Y(I)
NEXT I
END
Макет печати результатов (по Basic-программе)
Матрица A X Y
–4 7 –5
8 –3
8 6 –6
7 –6
–7 –8 2
2 8
Функция srand(time(0)) и оператор RANDOMIZE TIMER
нужны для того, чтобы каждый раз при выполнении программы
создавалась новая последовательность псевдослучайных чисел.
Ручной расчёт результатов возможен только после выполнения
программы, в которой необходимо заранее предусмотреть вывод
искомого массива.
  Результаты работы программы приведены в макете печати.
   Задание чисел из диапазона [A;B] на языке Basic
осуществляется по формуле (для целых чисел):
                        INT(A + (B - A) · RND)
                   Листинг Basic-программы
                         Программный код
    Ввод-вывод матрицы A               Ввод-вывод массива X,Y
CLS                              CLS
N = 3                            N = 3
RANDOMIZE TIMER                  RANDOMIZE TIMER
DIM A(N,N)                       DIM X(N),Y(N)
PRINT "МАТРИЦА А"                PRINT TAB(3); " X Y"
FOR I = 1 TO N                   FOR I = 1 TO N
 FOR J = 1 TO N                   X(I)=INT(–10 + 20*RND)
  A(I,J)=INT(–10 + 20*RND)        Y(I)=INT(–10 + 20*RND)
  PRINT USING "##",A(I,J);        PRINT USING "##",X(I);
 NEXT J                           PRINT USING "##",Y(I)
PRINT ' Пропуск строки           NEXT I
NEXT I                           END
END

         Макет печати результатов (по Basic-программе)
            Матрица A                       X             Y
    –4          7           –5              8             –3
     8          6           –6              7             –6
    –7         –8            2              2              8
   Функция srand(time(0)) и оператор RANDOMIZE TIMER
нужны для того, чтобы каждый раз при выполнении программы
создавалась новая последовательность псевдослучайных чисел.
   Ручной расчёт результатов возможен только после выполнения
программы, в которой необходимо заранее предусмотреть вывод
искомого массива.


                                 139