Даннмассив натуральных чисел?

Лол10343 23 авг. 2020 г., 22:06:44

Const N = 20 ;

var a : array [1.

N] of integer ; i, k, sum, s : integer ;

begin for i : = 1 to N do begin a[i] : = random(11) ; / / заполняем sum : = sum + a[i] ; / / Сумма всех эл - тов end ; for i : = 1 to N do write(a[i], ' ') ; / / Выводим writeln ; / / переход на новую строку writeln(sum) ; readln(k) ; for i : = 1 to N do if ((a[i] mod k) = 0) then s : = s + a[i] ; / / сумма эл - тов кратных k writeln(s) ;

end.

Directionerdia 29 мая 2020 г., 18:09:49 | 10 - 11 классы

Pascal массивы заполнить массив P[200] случайными целыми числами из интервала ( - 150 ; 150)?

Pascal массивы заполнить массив P[200] случайными целыми числами из интервала ( - 150 ; 150).

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

Kiborg37 21 апр. 2020 г., 07:15:44 | 10 - 11 классы

Заполнить массив случайными числами (положительными и отрицательными) из произвольного диапазона?

Заполнить массив случайными числами (положительными и отрицательными) из произвольного диапазона.

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

Посчитать общее количество элементов, кратных 3 и нечетных элементов и вывести на экран.

Olegolegru 5 янв. 2020 г., 20:30:44 | 10 - 11 классы

Заполнить массив случайными числами из интервала [ - 50 ; 50] , вывести массив на экран, посчитать сумму отрицательных элементов?

Заполнить массив случайными числами из интервала [ - 50 ; 50] , вывести массив на экран, посчитать сумму отрицательных элементов.

Helz 21 июл. 2020 г., 13:49:40 | 10 - 11 классы

Дан массив из 50 чисел?

Дан массив из 50 чисел.

Заполните его случайными числами.

Вывести на экран сначала все положительные его элементы, а затем все отрицательные.

Ntoniy10 30 мар. 2020 г., 04:29:04 | 10 - 11 классы

Дан массив целых чисел, состоящий из 10 элементов?

Дан массив целых чисел, состоящий из 10 элементов.

Заполнить его с клавиатуры.

Найти : - Удвоенную сумму положительных элементов ; - Вывести значения тех элементов, которые меньше заданного числа А кратны 3.

Sashulya20 15 апр. 2020 г., 18:20:05 | 5 - 9 классы

Дан массив натуральных чисел, заполненный случайными числами?

Дан массив натуральных чисел, заполненный случайными числами.

Найти произведение элементов кратных 3.

Ksana1051 29 янв. 2020 г., 11:47:00 | 5 - 9 классы

Заполнить массив случайным образом и вывести на экран сумму нечетных элементов?

Заполнить массив случайным образом и вывести на экран сумму нечетных элементов.

В паскале).

23420 14 апр. 2020 г., 17:10:34 | 10 - 11 классы

Дан массив A (20) заполнить его случайными целыми числами из [ - 10 ; 20] вывести на экран найти минимальный элементы массива и сумму положительных чисел?

Дан массив A (20) заполнить его случайными целыми числами из [ - 10 ; 20] вывести на экран найти минимальный элементы массива и сумму положительных чисел.

СветЛана9910 3 мая 2020 г., 09:11:59 | 10 - 11 классы

Заполнить массив случайными числами (положительными и отрицательными) из произвольного диапазона?

Заполнить массив случайными числами (положительными и отрицательными) из произвольного диапазона.

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

Заменить все отрицательные элементы квадратом соответствующего индекса.

UhbuC2razoocks 3 сент. 2020 г., 04:01:42 | 5 - 9 классы

Заполните линейный массив из 14 элементов случайными целыми числами с помощью функции случайного числа из интервала от - 20 до - 8?

Заполните линейный массив из 14 элементов случайными целыми числами с помощью функции случайного числа из интервала от - 20 до - 8.

Вывести его в одну строку.

Найти в массиве на минимальный элемент , на какой позиции он стоит в массиве.