Написать программу суммирования элементов массива, состоящего из 20 произвольных чисел до первого отрицательного числа?

Ильназ1 8 дек. 2020 г., 23:21:19

Program symm ; uses crt ;

const N = 20 ;

var masiv : array [1.

20] of integer ; i : integer ; summa, x : integer ; beginfor i : = 1 to N do begin masiv[i] : = Random(25) - 10 ; Writeln(masiv[i]) end ; for i : = 1 to N do if (masiv[i]> ; 0) then begin x : = masiv[i] ; summa : = summa + x ; end else begin Writeln() ; Writeln('Сумма элементов массива до первого отрицательного числа = ', summa) ; Halt end ;

end.

Temirlansyzdyk 8 дек. 2020 г., 23:21:22

Const n = 20 ;

var a : array [1.

N] of integer ;

s, i : integer ;

begin

Randomize ;

for i : = 1 to n do

begin

a[i] : = Random(21) - 10 ;

Write(a[i], ' ')

end ;

writeln ;

s : = 0 ;

i : = 1 ;

while (i< ; = n)and(a[i]> ; 0) do

begin s : = s + a[i] ; i : = i + 1 ; end ;

Writeln('Сумма элементов массива до первого отрицательного числа = ', s) ;

end.

Пример :

7 4 - 5 6 - 3 0 4 4 4 3 0 0 5 6 9 6 3 - 9 - 3 6

Сумма элементов массива до первого отрицательного числа = 11.

Dg8 5 апр. 2020 г., 00:05:52 | 10 - 11 классы

В одномерном динамическом массиве, состоящем из n целочисленных элементов, вычислить количество отрицательных чисел?

В одномерном динамическом массиве, состоящем из n целочисленных элементов, вычислить количество отрицательных чисел.

Программу написать на языке С / С + + .

Zvyagincevay 3 окт. 2020 г., 11:38:46 | 10 - 11 классы

1. Написать программу для нахождения числа нечетных элементов в массиве из 10 беззнаковых чисел?

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

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

3. Написать программу для замены всех четных элементов массива из 10 беззнаковых чисел единицами 4.

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

5. Написать программу для замены всех троек в массиве из 10 беззнаковых чисел пятерками.

Cmki 17 окт. 2020 г., 09:31:05 | 10 - 11 классы

Написать программу подсчёта числа отрицательных элементов массива?

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

VJGinger 8 авг. 2020 г., 22:37:09 | 5 - 9 классы

Пожалуйста помогите) 1) написать программу , заполняющую массив из 10 элементов числами от 10 до 1?

Пожалуйста помогите) 1) написать программу , заполняющую массив из 10 элементов числами от 10 до 1.

2)написать программу подсчитывающую количество нечетных элементов в массиве случайных чисел.

3) программа заполняет массив случайными числами от - 10 до 10 и находит сумму отрицательных и положительных элементов.

Lerstweretina 11 апр. 2020 г., 14:38:14 | 10 - 11 классы

6. Написать программу для нахождения числа нечетных элементов в массиве из 10 беззнаковых чисел?

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

7. Написать программу для нахождения числа отрицательных элементов в массиве из 10 знаковых чисел 8.

Написать программу для замены всех четных элементов массива из 10 беззнаковых чисел единицами.

9. Написать программу для замены всех нулевых элементов массива из 10 знаковых чисел единицами 10.

Написать программу для замены всех троек в массиве из 10 беззнаковых чисел пятерками.

Trutatu12 26 мар. 2020 г., 23:42:32 | 5 - 9 классы

Увеличить на 4 все элементы в первой половине массиваA (считать, что в массиве чётное число элементов)?

Увеличить на 4 все элементы в первой половине массива

A (считать, что в массиве чётное число элементов).

Размер массива и значения

элементов массива – произвольные.

Ангелина2003ангел 8 янв. 2020 г., 15:03:48 | 5 - 9 классы

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

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

Помогите отредактировать программу.

Kris656 29 мая 2020 г., 11:19:10 | 10 - 11 классы

Написать программу и блок - схему для решения следующей задачи?

Написать программу и блок - схему для решения следующей задачи.

В двумерном массиве, состоящем из целочисленных элементов, поменять местами : в каждом столбце первый и последний отрицательные элементы ;

(Паскаль).

Vika19973 10 февр. 2020 г., 04:51:12 | 10 - 11 классы

Pascal ABC?

Pascal ABC.

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

D20031 30 авг. 2020 г., 23:29:46 | 5 - 9 классы

Составьте программу вычисления в массиве В, состоящем из восьми элементов, суммы отрицательных элементов?

Составьте программу вычисления в массиве В, состоящем из восьми элементов, суммы отрицательных элементов.

Паскаль.