|
zadach189.BAS |
|
{* Задача189 *}REM basic ' Умножить массив В(10) на 5CLS PRINT "Исходный массив"
For i = 1 To 10 B(i) = CInt(RND * 8 + 1) PRINT B(i);
Next i: PRINT
For i = 1 To 10 B(i) = B(i) * 5
Next i
PRINT "Результат"
For i = 1 To 10 PRINT B(i);
Next i: PRINT
End
|