Qbasicдан массив. все его элементы умножить ** последний элемент

0 голосов
33 просмотров

Qbasic
дан массив. все его элементы умножить на последний элемент


Информатика (8.2k баллов) | 33 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

DIM a(1 TO 10)
CLS
RANDOMIZE (TIMER)
FOR i = 1 TO 10
   a(i) = CINT(10 * RND + 11)
   PRINT a(i);
NEXT i
PRINT
FOR i = 1 TO 10
   a(i) = a(i)*a(10)
   PRINT a(i);
NEXT i
PRINT

(194k баллов)