Формирование одномерного массива из 12 элементов. элементы задаются с генератора случайных чисел в диапозоне (0;5)!

Паскаль:
const n=12;
var a:array [ 1 .. n ] of real;
i:integer;
begin
randomize;
for i:=1 to n do
a[ i ] := random * 5;
end.

Бейсик какой-то:
DIM A(12)
FOR I = 1 TO 12
A( I ) = RND ( 1 ) * 5
NEXT I