Дан массив из 15 чисел заполненный случайными числами из интервала [ - 20 ; 20]?

Olyakyivska 17 февр. 2020 г., 15:40:51

/ / Pascal ABC.

NET v3.

1 сборка 1172

Var

ar : array[1.

15] of integer ;

i, k1, k2 : integer ;

r1, r2 : real ;

begin

randomize ;

writeln('Array : ') ;

for i : = 1 to 15 do begin ar[i] : = random( - 20, 20) ; write(ar[i] : 4) ; if i mod 2 = 0 then begin inc(k1) ; r1 : = r1 + ar[i] ; end ; if ar[i]> ; 0 then begin inc(k2) ; r2 : = r2 + k2 ; end ; end ;

r1 : = r1 / k1 ;

r2 : = r2 / k2 ;

writeln ;

if r1> ; r2 then writeln('Среднее арифметическое элементов стоящих на четных местах') ;

if r1< ; r2 then writeln('Cреднее арифметическое положительных элементов массива') ;

if r1 = r2 then writeln('Равно') ;

end.

Primd 15 февр. 2020 г., 08:34:32 | 5 - 9 классы

Дан массив, содержащий N элементов и заполненный случайными числами от - 10 до 9?

Дан массив, содержащий N элементов и заполненный случайными числами от - 10 до 9.

Сформировать новый массив из значений элементов, стоящих на четных местах.

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

Ktibr260 23 янв. 2020 г., 21:05:46 | 5 - 9 классы

Помогите решить задачу : дан двумерный массив?

Помогите решить задачу : дан двумерный массив.

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

(Gambas)!

Таантя 26 сент. 2020 г., 19:41:16 | 5 - 9 классы

1. Дан одномерный массив из N элементов?

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

Заменить в нем значение макс и мин элемента на сумму всех элементов массива 2.

Дан одномерный массив из Н элементов.

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

Vikavizsa 13 сент. 2020 г., 02:37:20 | 10 - 11 классы

В одномерном массиве от нуля до 10 заполненный случайным образом найти среднее арифметическое элементов массива?

В одномерном массиве от нуля до 10 заполненный случайным образом найти среднее арифметическое элементов массива.

Qwefhnjhhv 19 мар. 2020 г., 06:19:08 | 10 - 11 классы

В одном массиве найти среднее арифметическое четных элементов стоящих на не нечетных местах ?

В одном массиве найти среднее арифметическое четных элементов стоящих на не нечетных местах .

Паскаль.

Ovsyanikovanas 28 мар. 2020 г., 18:53:34 | 5 - 9 классы

Дан одномерный массив чисел?

Дан одномерный массив чисел.

Определить среднее арифметическое элементов массива.

DianaKrav4enko 28 июл. 2020 г., 10:32:45 | 10 - 11 классы

Дан массив целых чисел (n = 25), заполненный случайным образом числами из промежутка [ - 10, 50] : 1) заменить максимальный элемент массива на среднее арифметическое значение этого массива ; 2) найти ?

Дан массив целых чисел (n = 25), заполненный случайным образом числами из промежутка [ - 10, 50] : 1) заменить максимальный элемент массива на среднее арифметическое значение этого массива ; 2) найти сумму положительных элементов, кратных 7.

Кристюшечкака 15 нояб. 2020 г., 04:15:00 | 10 - 11 классы

Дан массив из 10 целых чисел заполненный случайными числами из интервала [ - 15 ; 15]?

Дан массив из 10 целых чисел заполненный случайными числами из интервала [ - 15 ; 15].

Определить является ли произведение элементов массива имеющих нечетные порядковые номера четным числом.

Romchik13 3 сент. 2020 г., 17:31:37 | 10 - 11 классы

Дан одномерный массив вещественных чисел найти средняя арифметическая положительных элементов?

Дан одномерный массив вещественных чисел найти средняя арифметическая положительных элементов.

Flover11 18 дек. 2020 г., 00:43:03 | 10 - 11 классы

Дан массив целых чисел, определить сколько среди его элементов больших, чем среднее арифметическое всех элементов массива?

Дан массив целых чисел, определить сколько среди его элементов больших, чем среднее арифметическое всех элементов массива.

С + + или С.