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

0 голосов

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


спросил от Отличник (8.2k баллов) в категории Информатика
1 Ответ
0 голосов
ответил от БОГ (194k баллов)
 
Лучший ответ

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

...