zadach189.BAS

{* Задача189 *}

REM basic

' Умножить массив В(10) на 5


CLS
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