lekan09 L lekan09 Регистрация 16 Авг 2013 Сообщения 68 Репутация -4 Спасибо 0 Монет 0 26 Ноя 2016 #1 Как произвольно заполнить массив числами 0,1,5,11 на языке Delphi ?
Fallout F Fallout Регистрация 26 Ноя 2013 Сообщения 94 Репутация 0 Спасибо 0 Монет 0 27 Ноя 2016 #2 рандом тебя спасет Позитивный голос 0
HHPP H HHPP Регистрация 8 Мар 2013 Сообщения 74 Репутация 0 Спасибо 0 Монет 0 27 Ноя 2016 #3 const c: array [0..3] of integer=(0,1,5,11); var a: array [0..100]of integer; for i:=0 to 100 do a:=c[random(4)]; Позитивный голос 0
const c: array [0..3] of integer=(0,1,5,11); var a: array [0..100]of integer; for i:=0 to 100 do a:=c[random(4)];
