Дан массив положительных и отрицательных чисел?

Стаканчикарита 7 мар. 2020 г., 05:28:53

Var k, sum, n, i : integer ; A : array of integer ;

begin writeln('Введите размерность массива : ') ; readln(n) ; SetLength(A, n + 1) ; writeln('Введите ', n, ' элементов массива : ') ; for i : = 1 to n do begin readln(A[i]) ; if i mod 2 < ; > ; 0 then begin if A[i] > ; 0 then inc(sum) ; if A[i] < ; 0 then inc(k) ; end ; end ; writeln('Кол - во положительных чисел, стоящих на нечетных местах : ', sum) ; writeln('Кол - во отрицательных чисел, стоящих на нечетных местах : ', k) ;

end.

Ekaterina472 22 авг. 2020 г., 05:36:51 | 5 - 9 классы

С клавиатуры ввели 10 чисел положительных и отрицательных?

С клавиатуры ввели 10 чисел положительных и отрицательных.

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

Дураков 10 мая 2020 г., 14:18:20 | 10 - 11 классы

Найти количество положительных (отрицательных) чисел среди четырех чисел А, В, С, D?

Найти количество положительных (отрицательных) чисел среди четырех чисел А, В, С, D.

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

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

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

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

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

Anime2003 14 мая 2020 г., 09:42:11 | 10 - 11 классы

Дан массив целых чисел из 12 элементов?

Дан массив целых чисел из 12 элементов.

Поменять местами первый отрицательный с первым положительным.

Nik209 19 июн. 2020 г., 10:57:35 | 5 - 9 классы

Написать в программе Паскаль программу :Вывести сначала положительные числа из отрезка [a ; b], а потом отрицательные числа из отрезка [a ; b] и количество положительных и отрицательных чисел из отрез?

Написать в программе Паскаль программу :

Вывести сначала положительные числа из отрезка [a ; b], а потом отрицательные числа из отрезка [a ; b] и количество положительных и отрицательных чисел из отрезка [a ; b].

Altapkinpavel 19 сент. 2020 г., 14:24:41 | 10 - 11 классы

Дан массив?

Дан массив.

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

Zenkova929 24 июл. 2020 г., 13:36:47 | 10 - 11 классы

Pascal?

Pascal.

Дана последовательность чисел .

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

Киса315 19 апр. 2020 г., 17:02:37 | 10 - 11 классы

Подсчитайте, сколько среди данных N чисел нулей, положительных чисел, отрицательных чисел?

Подсчитайте, сколько среди данных N чисел нулей, положительных чисел, отрицательных чисел.

Вводится число N, а затем N чисел.

Необходимо вывести сначала число нулей, затем число положительных и отрицательных чисел.

C + +.

Anna200478 15 дек. 2020 г., 14:02:53 | 5 - 9 классы

Паскаль?

Паскаль.

Подсчитайте количество отрицательных и положительных чисел среди чисел a, b, c.

КонфФфета 19 окт. 2020 г., 17:22:51 | 10 - 11 классы

Дан массив целых чисел , определить в нем количество положительных и отрицательных?

Дан массив целых чисел , определить в нем количество положительных и отрицательных.