Помогите пожалуйста решить две задачи?

1nastyazimina1 13 янв. 2020 г., 07:43:48

2)

const n = 10 ;

var a : array[1.

N] of integer ;

k, i : integer ;

begin

writeln('vvedite massiv = ') ;

for i : = 1 to n do

readln(a[i]) ;

k : = 0 ;

for i : = 1 to n do

if a[i]> ; 0 then inc(k) ;

writeln ('k = ', k) ;

readln ;

end.

______________

1)

const n = 10 ;

var a : array[1.

N] of integer ;

s, p, i : integer ;

begin

writeln('vvedite massiv = ') ;

for i : = 1 to n do

readln(a[i]) ;

s : = 0 ;

p : = 1 ;

for i : = 1 to n do

if (a[i] mod 2 = 1) and (a[i] mod 3 = 0) then begin

s : = s + a[i] ;

p : = p * a[i] ;

end ;

writeln('s = ', s, ' p = ', p) ;

readln ;

end.

Godfather479 22 июл. 2020 г., 15:40:15 | 10 - 11 классы

Задача : Дан массив A состоящий из 10 элементов, заполнить его случайными числами и найти сумму элементов?

Задача : Дан массив A состоящий из 10 элементов, заполнить его случайными числами и найти сумму элементов.

Решите задачу несколькими спосабами.

Daushevashevchuk 5 окт. 2020 г., 08:34:22 | 5 - 9 классы

Дан массив А(8)?

Дан массив А(8).

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

Благодарю заранее.

Седдааа 7 апр. 2020 г., 01:01:43 | 5 - 9 классы

Дан массив состоящий из 10 элементов заполнить массив целых чисел найти сумму, количество элементов положительных и кратных три?

Дан массив состоящий из 10 элементов заполнить массив целых чисел найти сумму, количество элементов положительных и кратных три.

Polina1386 17 июн. 2020 г., 20:42:40 | 5 - 9 классы

Дан массив из 25 элементов, заполненный случайным образом, из указанного промежутка ( - 10 ; 10)?

Дан массив из 25 элементов, заполненный случайным образом, из указанного промежутка ( - 10 ; 10).

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

Написать на паскале.

Tasya33 23 апр. 2020 г., 17:27:25 | 10 - 11 классы

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

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

Дан массив.

Есть ли в нем отрицательный элемент?

Заранее огромнейшее спасибо.

Nila123 8 окт. 2020 г., 22:07:07 | 10 - 11 классы

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

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

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

Алиша91 6 окт. 2020 г., 23:14:57 | 5 - 9 классы

Буду очень благодарен?

Буду очень благодарен!

Помогите с задачей, пожалуйста.

1. Дан массив.

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

Ммм000 24 сент. 2020 г., 15:14:27 | 5 - 9 классы

Дан одномерный массив А из 12 - ти элементов?

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

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

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

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

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

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

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

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

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

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

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

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

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

Arinapalamarchu 2 янв. 2020 г., 08:46:49 | 5 - 9 классы

Составьте програму : Дан целочисленный одномерный массив, состоящий из n элементов?

Составьте програму : Дан целочисленный одномерный массив, состоящий из n элементов.

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