Составить программу массив из 10 целых чисел
Var i:integer; a:array [1..10] of integer; begin randomize; begin For i:= 1 to 10 do random (100)-50; end; end.
Основа для массива. Остальное, что на фотографии стоит больше 5 баллов.