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

Информатика | 5 - 9 классы

PascalABC

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

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

Найти сумму элементов, имеющий нечётный индекс.

2)Сформировать одномерные массив из N элементов, где элементы массива - целые случайные числа.

Вывести индексы тех элементов, значение которых больше заданного числа A (A вводить с клавиатуры).

3)Определите, есть ли в данном массиве положительные элементы, кратные k (k вводить с клавиатуры).

Ответить на вопрос
Ответы (1)
L06 27 нояб. 2020 г., 01:23:15

Program

zadagha_1 ;

var

a :

array[1.

8] of integer ;

i, sum : integer ;

begin

writeln('vvedite

8 chisel') ;

for i : = 1 to

8 do read(a[i]) ;

sum : = 0 ;

for i : = 1 to

8 do begin

if i mod 2 0 then begin

sum : = sum + a[i] ;

writeln(a[i]) ;

end ;

end ;

writeln() ;

writeln('summa

elementov c nechetnim N = ', sum) ;

end.

Program

zadagha_2 ; varb :

array[1.

1000] of integer ; i, a, n : integer ; beginwriteln('vvedite

chislo - kolichestvo elementov massiva') ; readln(n) ; for i : = 1 to

n do beginb[i] : = random(1000) ; write(b[i] : 6) ; end ; writeln() ; writeln('vvedite

chislo') ; readln(a) ; write

('elementi > dannogo chisla : ') ; for i : = 1 to

n do beginif

b[i]>a then write (i : 4) ; end ;

end.

Program

zadacha_3 ; vara :

array[1.

100] of integer ; i, n, k :

integer ; beginn : = random(100) ; for i : = 1 to

n do begina[i] : = random(1000) - 500 ; write(a[i] : 6) ; end ; writeln() ; writeln('vvedite

chislo') ; readln(k) ; writeln('v

massive chisly ', k, ' kratni : ') ; for i : = 1 to

n do beginif (a[i] mod k = 0) and (a[i]>0) then beginwrite(a[i] : 6) ; end ; end ;

end.

Combo27 24 окт. 2020 г., 15:07:29 | 10 - 11 классы

Сделать одномерный массив?

Сделать одномерный массив.

В массив A[N] занесены натуральные числа.

Найти сумму тех элементов, каторые кратны данному значению К.

Элементы массива вводить с клавиатуры.

Dleznjuk 23 февр. 2020 г., 21:36:26 | 5 - 9 классы

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

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

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

К чётным элементам прибавить А, а от нечётных отнять В(числа вводятся с клавиатуры).

5даг05 26 июл. 2020 г., 00:38:29 | 10 - 11 классы

Help?

Help!

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

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

Найти : - Удвоенную сумму положительных элементов ; - Удалить все четные элементы массива.

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

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

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

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

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

MRcoffee 14 мар. 2020 г., 08:36:28 | 5 - 9 классы

Помогите решить задачи на паскаль?

Помогите решить задачи на паскаль.

1) Дан массив случайных чисел (количество элементов вводите с клавиатуры).

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

2) Дан массив случайных чисел (количество элементов вводите с клавиатуры).

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

3) Дан массив случайных чисел (количество элементов вводите с клавиатуры).

Найти максимальный элемент массива.

4) Дан массив случайных чисел (количество элементов вводите с клавиатуры).

Найти максимальный элемент массива среди элементов, кратных 3.

Wapiro 15 июн. 2020 г., 23:50:17 | 5 - 9 классы

Дан одномерный массив с индексами от 0 до 14, найти индекс минимального и максимального элементов массива(числа вводятся с клавиатуры)?

Дан одномерный массив с индексами от 0 до 14, найти индекс минимального и максимального элементов массива

(числа вводятся с клавиатуры).

Gffghvd 8 окт. 2020 г., 19:16:16 | 5 - 9 классы

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

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

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

3)Найти элемент массива кратный 12 и его индекс.

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

5)Вывести индексы тех элементов, которых кратн.

IldarAWM 2 дек. 2020 г., 16:47:58 | 5 - 9 классы

Помогите пожалуйста с информатикой?

Помогите пожалуйста с информатикой!

Массивы На паскале.

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

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

Найти : •вывести индексы тех элементов, значения которых больше заданного числа А ; •определить, есть ли в данном массиве положительные элементы, кратные k (k вводить с клавиатуры).

Laszay14 2 окт. 2020 г., 14:20:12 | 5 - 9 классы

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

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

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

Найти :

1)сумму элементов, имеющих нечетное значение ;

2)вывести индексы тех элементов, значения которых больше заданного числа А.

Appland4569 19 нояб. 2020 г., 15:04:46 | 5 - 9 классы

3 ЗАДАЧИ НА ПРОГРАММИРОВАНИЕ В ПАСКАЛЬ ЗА 30 БАЛЛОВ1?

3 ЗАДАЧИ НА ПРОГРАММИРОВАНИЕ В ПАСКАЛЬ ЗА 30 БАЛЛОВ

1.

Задан массив А, состоящий из n чисел.

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

Элементы вводятся с клавиатуры.

2. Найти сумму элементов массива с четными номерами, содержащего N элементов.

Элементы вводятся с клавиатуры.

3. Дан одномерный массив, значения элементов которого вводятся с клавиатуры.

Выяснить, каких элементов больше - положительных или отрицательных и насколько.

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

На этой странице находится ответ на вопрос PascalABC1)Дан массив целых чисел, состоящий из 8 элементов?, из категории Информатика, соответствующий программе для 5 - 9 классов. Чтобы посмотреть другие ответы воспользуйтесь «умным поиском»: с помощью ключевых слов подберите похожие вопросы и ответы в категории Информатика. Ответ, полностью соответствующий критериям вашего поиска, можно найти с помощью простого интерфейса: нажмите кнопку вверху страницы и сформулируйте вопрос иначе. Обратите внимание на варианты ответов других пользователей, которые можно не только просмотреть, но и прокомментировать.