сформировать одновременный массив из 10 элементов с помощью датчика случайных величин на интервале [-20,5]
10-11 класс
|
const
n = 10;
var
x: array[1..n] of integer;
i: integer;
begin
Randomize;
Write('Элементы массива: ');
for i := 1 to n do
begin
x[i] := Random(26) - 20;
Write(x[i]:4)
end
end.
Тестовое решение:
Элементы массива: -9 3 0 -16 -11 -2 -20 -5 5 -18
Наверно все же одномерный....
Другие вопросы из категории
буду очень благодарна
Массив из 15 элементов заполнить случайными целыми числами кратными трём в интервале от -45 до 50. Вывести полученный массив на экран в строчку. Найти индекс наибольшего элемента массива.
a ) сумму отрицательных элементов массива ;
b ) количество элементов , удовлетворяющих условию 7 Pascal
Читайте также
индексами. выведите на экран исходный массив и полученное среднее арифметическое.
2. Задайте массив из 10 элементов с помощью датчика случайных чисел. замените все элементы с четными индексами максимальными. Выведите на экран исходный и измененный массивы
Выведите на экран исходный и полученный массив. На Паскале
нечетные индексы. Выведите на экран исходный массив и полученное произведение.
на минимальный. Выведите на экран исходный и полученный массивы.