Задать вопрос
1 января, 04:49

Введите с клавиатуры одномерный массив А (N), элементами которого являются

положительные и отрицательные целые числа. Подсчитайте произведение положительных

элементов этого массива и количество отрицательных. Сформируйте новый массив В (N) из

элементов массива А (N), в котором все элементы которые стоят на четных местах замените

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

+2
Ответы (1)
  1. 1 января, 08:04
    0
    Var

    a, b:array [1 ... 1000] of integer;

    i, s, c, n:integer;

    begin

    writeln ('Введите кол-во чисел') ;

    readln (n) ;

    s:=1;

    c:=0;

    for i:=1 to n do begin

    writeln ('a[', i,'] = ') ;

    read (a[i]) ;

    if (a[i]>0) then s:=s*a[i];

    if (a[i]<0) then c:=c+1;

    end;

    for i:=1 to n do begin

    if (i mod 2 0) then a[i]:=c

    else a[i]:=s;

    end;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Введите с клавиатуры одномерный массив А (N), элементами которого являются положительные и отрицательные целые числа. Подсчитайте ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Хотя бы 3-4 задачи! 1) Дан одномерный целочисленный массив размерностью N. Найдите количество элементов, которые кратны 3 (5). 2) Дан одномерный целочисленный массив А, состоящий из N элементов. Найти сумму всех четных элементов массива.
Ответы (1)
Введите с клавиатуры одномерный массив А (I), элементами которого являются положительные и отрицательные целые числа.
Ответы (1)
Введите с клавиатуры одномерный массив С (М), элементами которого являются положительные и отрицательные целые числа. Найдите количество отрицательных чисел.
Ответы (1)
1) дан массив. найти сумму положительных и нечетных и количество отрицательных четных элементов 2) Дан массив целых чисел.
Ответы (1)
1. Массив и 4 целых чисел вводится с клавиатуры. Найти и вывести произведение элементов массива. 2. Массив из 6 отрицательных и положительных целых чисел вводится в области описания констант. Найти сумму положительных элементов массива. 3.
Ответы (1)