M Mishanka87 Регистрация 17 Май 2013 Сообщения 74 Репутация 0 Спасибо 0 Монет 0 25 Июн 2018 #1 Информатика Массивы
Т толян Регистрация 28 Май 2013 Сообщения 72 Репутация 0 Спасибо 0 Монет 0 25 Июн 2018 #2 Детский лепет какой-то... Ты ВНЯТНО написать можешь, чего тебе нужно? АОТ: Type TRange = -20..20; var x: array[1..30]of TRange; ... Позитивный голос 0
Детский лепет какой-то... Ты ВНЯТНО написать можешь, чего тебе нужно? АОТ: Type TRange = -20..20; var x: array[1..30]of TRange; ...
А Алексей174 Регистрация 12 Июл 2013 Сообщения 78 Репутация 0 Спасибо 0 Монет 0 25 Июн 2018 #3 var a :array[1..30] of integer; i:integer; begin Randomize; for i:=1 to 30 do a:= Random(-20,20); for i:=1 to 30 do writeln(a); end. Позитивный голос 0
var a :array[1..30] of integer; i:integer; begin Randomize; for i:=1 to 30 do a:= Random(-20,20); for i:=1 to 30 do writeln(a); end.
В выавыапыв Регистрация 2 Ноя 2013 Сообщения 67 Репутация 0 Спасибо 0 Монет 0 25 Июн 2018 #4 Чета как-то... ну.. пусть будет 20$ Позитивный голос 0
Q qwerty123543 Регистрация 21 Июл 2013 Сообщения 72 Репутация 0 Спасибо 0 Монет 0 25 Июн 2018 #5 uses crt; var a :array[1..30] of integer; i:integer; begin Randomize; for i:=1 to 30 do begin a:= Random(41)-20; write(a:4); end end. Позитивный голос 0
uses crt; var a :array[1..30] of integer; i:integer; begin Randomize; for i:=1 to 30 do begin a:= Random(41)-20; write(a:4); end end.
K kare2030 Регистрация 15 Окт 2013 Сообщения 83 Репутация 0 Спасибо 0 Монет 0 25 Июн 2018 #6 блин сложна Позитивный голос 0