1. В одномерном массиве произвольных чисел А(10) положительные элементы уменьшить в двое, а отрицательные элементы заменить на значения их индексов?

Ророл 16 нояб. 2020 г., 06:17:07

Const n = 10 ;

var a : array[1.

N] of integer ; i : integer ;

begin Randomize ; Writeln('Исходный массив') ; for i : = 1 to n do begin a[i] : = Random(51) - 25 ; Write(a[i] : 4) ; end ; Writeln ; Writeln('Результирующий массив') ; for i : = 1 to n do begin if a[i] > ; 0 then a[i] : = a[i] div 2 else a[i] : = i ; Write(a[i] : 4) ; end ; Writeln ;

end.

Тестовое решение :

Исходный массив 5 - 19 - 24 - 21 - 4 14 - 18 - 21 2 - 14

Результирующий массив 2 2 3 4 5 7 7 8 1 10.

Solnce101 30 сент. 2020 г., 20:39:39 | 10 - 11 классы

В произвольно заданном одномерном массиве ( случайные значения из отрезка от - 6 до 11) из 10 элементов, определить количество отрицательных, нулевых и положительных элементов?

В произвольно заданном одномерном массиве ( случайные значения из отрезка от - 6 до 11) из 10 элементов, определить количество отрицательных, нулевых и положительных элементов.

Mirysa230902 6 дек. 2020 г., 07:15:14 | 10 - 11 классы

Найти количество положительных и отрицательных элементов в одномерном массиве?

Найти количество положительных и отрицательных элементов в одномерном массиве.

Angell1234 30 сент. 2020 г., 16:03:39 | 10 - 11 классы

(Pascal или Delphi) В заданном массиве A(N) положительные элементы уменьшить вдвое, а отрицательные заменить на значения их индексов?

(Pascal или Delphi) В заданном массиве A(N) положительные элементы уменьшить вдвое, а отрицательные заменить на значения их индексов.

17LIZA17 31 дек. 2020 г., 04:10:58 | 10 - 11 классы

Замените нулями все положительные элементы одномерного массива A длины N?

Замените нулями все положительные элементы одномерного массива A длины N.

ViskasAleksand 22 янв. 2020 г., 04:49:30 | 10 - 11 классы

В одномерном массиве произвольных чисел найти количество нечётных элементов(паскаль)?

В одномерном массиве произвольных чисел найти количество нечётных элементов(паскаль).

Kat2005 8 мар. 2020 г., 11:53:27 | 10 - 11 классы

Из элементов двумерного массива создать два новых одномерных Один из положительных Другой из отрицательных?

Из элементов двумерного массива создать два новых одномерных Один из положительных Другой из отрицательных.

Diana98n 10 июн. 2020 г., 21:33:13 | 10 - 11 классы

В одномерном массиве А(10) найти максимальный элемент, вывести его значение и индекс?

В одномерном массиве А(10) найти максимальный элемент, вывести его значение и индекс.

Заменить все четные элементы значением максимального элемента.

Полученный массив вывести на экран.

Sahasur 13 сент. 2020 г., 00:34:00 | 10 - 11 классы

В одномерном массиве А, состоящем из 12 целых чисел, все положительные элементы заменить пятеркой?

В одномерном массиве А, состоящем из 12 целых чисел, все положительные элементы заменить пятеркой.

Лрапо 28 мар. 2020 г., 15:23:38 | 10 - 11 классы

1) Дан массив A(n)?

1) Дан массив A(n).

Положительные элементы массива заменить на их сумму, а отрицательные элементы уменьшить на минимальный.

Фывфыв2 1 окт. 2020 г., 02:40:48 | 5 - 9 классы

Дан одномерный массив, состоящий из N элементов?

Дан одномерный массив, состоящий из N элементов.

Подсчитать количество положительных элементов и заменить эти элементы их индексами.