Все четные положительные элементы целочисленного массива уменьшить вдвое, все нечетные положительные увеличить на 2, а у всех остальных поменять знак?

Папееаро 2 сент. 2020 г., 23:19:55

Var i, k : integer ; a : array[1.

30] of integer ;

begin

for i : = 1 to 30 do

begin a[i] : = random(30) - 15 ; if (a[i]> ; 0) and (a[i] mod 2 = 0) then a[i] : = a[i] div 2 ; if (a[i]> ; 0) and (a[i] mod 2 < ; > ; 0) then a[i] : = a[i] * 2 ; if a[i]< ; 0 then a[i] : = a[i] * - 1 ;

end ;

for i : = 1 to 30 do writeln(a[i]) ;

end.

Een929 11 июн. 2020 г., 12:23:29 | 10 - 11 классы

Паскаль?

Паскаль.

Вычислить разность максимального среди элементов, имеющих четные значения, и максимального среди элементов, имеющих нечетные значения, в заданном целочисленном массиве из 30 положительных элементов (в предположении, что в массиве есть и четные, и нечетные элементы).

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

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

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

Luda963 20 нояб. 2020 г., 07:02:19 | 5 - 9 классы

Посчитайте кол - во положительных элементов целочисленного линейного массива , состоящего из 20 элементов ?

Посчитайте кол - во положительных элементов целочисленного линейного массива , состоящего из 20 элементов .

Настя122004 1 мар. 2020 г., 21:25:50 | 5 - 9 классы

Напишите пожалуйста программу, которая находит максимальный и минимальный из элементов массива с четными положительными значениями?

Напишите пожалуйста программу, которая находит максимальный и минимальный из элементов массива с четными положительными значениями.

Если в массиве нет элементов с четными положительными значениями, нужно вывести сообщение об этом.

С объяснением!

TATATATAS 1 июл. 2020 г., 05:45:42 | 10 - 11 классы

Заданы два двумерных целочислительных массива ?

Заданы два двумерных целочислительных массива .

Найти максимальный элемент в первом массиве и если он положительный чётный уменьшить его величину все положительные четные элементы второго массива .

Таблица программа блок схемах.

Помогите пожалуйста!

Mskrylova2003 20 июн. 2020 г., 16:45:23 | 5 - 9 классы

Создать массив из 12 целых чисел?

Создать массив из 12 целых чисел.

Нечетные элементы увеличить на их номер.

Положительные элементы уменьшить в три раза.

Olgapirog163 19 мар. 2020 г., 06:29:50 | 10 - 11 классы

Помогите пожалуйста : записать чётные положительные элементы целочисленных массивов X и Y в массив Z?

Помогите пожалуйста : записать чётные положительные элементы целочисленных массивов X и Y в массив Z.

Поменять минимальный и максимальный элементы массива Z.

Вывести элементы массива Z в четверичной системе счисления .

Coolalena200 17 окт. 2020 г., 17:57:45 | 10 - 11 классы

Помогите решить задачи в Pascal 1?

Помогите решить задачи в Pascal 1.

Поменять местами максимальный и минимальный элемент массива.

2. Вывести четные числа среди положительных элементов 3.

Напечатать сумму и номера положительных элементов после первого нулевого элемента.

Cat200235 10 июл. 2020 г., 02:03:00 | 5 - 9 классы

Дано : Массивы А(10), В(15)?

Дано : Массивы А(10), В(15).

Поменять местами их первые положительные элементы .

Для нахождения первого положительного элемента и его номера в массиве использовать подпрограмму.

Сделать в паскале.

Anatolijokshin 14 дек. 2020 г., 08:51:45 | 5 - 9 классы

Поменять местами первое положительное число с последним отрицательным числом в одномерном массиве из N целочисленых элементов (программа для PascalABC )?

Поменять местами первое положительное число с последним отрицательным числом в одномерном массиве из N целочисленых элементов (программа для PascalABC ).