Информатика Массивы
Вопрос дан целочисленный массив из 30 элементов элементы могут принимать значения от -20 до 20. Описать в п
- Автор темы Mishanka87
- Дата начала
Детский лепет какой-то... Ты ВНЯТНО написать можешь, чего тебе нужно? АОТ: Type TRange = -20..20; var x: array[1..30]of TRange; ...
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.
Чета как-то... ну.. пусть будет 20$
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.
блин сложна