М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Lakers44
Lakers44
24.06.2021 04:50 •  Информатика

Ввести массив а.

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

👇
Ответ:
polina359674
polina359674
24.06.2021

#include <stdio.h>

#include <stdlib.h>

int main()

{

int A[10]={};// Создаем массив состоящий из 10 элементов.

int CountForPlus = 0;// Счетчик для положительных значений.

int CountForMinus = 0;// Счетчик для отрицательных значений.

int Summ = 0;// Переменная в которой будут храниться сумма  элементов массива

printf("Vvedite 10 elementov massiva \n");

for (int i = 0; i < 10; i++)

{

 

 scanf_s("%d", &A[i]);

 if (A[i] < 0)

 {

  CountForMinus++;// Если, элемент массива будет отрицательным,

      // то счетчик для отрицательных значений будет увеличиваться.

 }

 else

 {

  CountForPlus++;// Иначе, элемент массива будет положительным,

       // то счетчик для положительных значений будет увеличиваться.

 }

 //Summ += Arr[i];

}

if (CountForPlus > CountForMinus) // Сравниваем счетчики, если положительный больше отрицательного то

{          // находим сумму всех элементов массива

 for (int i = 0; i < 10; i++)

 {

  Summ += A[i];

 }

 printf("%d \n", Summ);

}

else

{

 printf("otricatelnih elemntov massiva bolshe chem polochitelnih \n");

}

system("pause");

return 0;

}

Объяснение:

4,5(92 оценок)
Ответ:
strong28
strong28
24.06.2021

begin

 var n := ReadInteger;

 var a := ReadArrInteger(n);

 var (kp, kn) := (0, 0);

 foreach var c in a do

   if c > 0 then Inc(kp)

   else if c < 0 then Inc(kn);

 if kp > kn then a.Sum.Println;

end.

PascalABC.NET

4,4(3 оценок)
Открыть все ответы
Ответ:
Verabogomaz
Verabogomaz
24.06.2021
Var 
mas: array[1..7] of integer;
k, i, MAX:integer;

Begin
for i:=1 to 7 do
  Begin
  writeln('Введите число');
  readln(mas[i]); 
  end;

MAX:=mas[1];
k:=1;
for i:=2 to 7 do
  Begin
    if mas[i] > MAX   
       then      
          Begin       
               MAX:=mas[i];       
                k:=1;     
          end   
       else        
            if MAX=mas[i]          
                 then k:=k+1;
  end;

writeln();
writeln('Максимальное значение = ', MAX);
writeln('Количество элементов = ', k);

readln();
end.
4,7(70 оценок)
Ответ:
rakhmanets
rakhmanets
24.06.2021
Одним з перших комп’ютерів, який по праву можна вважати програмованим, був створений німецьким інженером Конрадом Цузе (1910-1995). Ще у школі, він створив машину для розміну грошей. Починаючи з 1934, будучи студентом технічного ВНЗ, він приступив до створення універсальної обчислювальної машини, яка була б програмованою, і могла вирішувати задачі будь-якого рівня складності.Почавши спочатку з десяткової системи, Цузе віддав перевагу все ж таки двійковій системі. І тут він проявив неабиякі здібності. Знаючи про роботи Буля не більше, ніж про машину Беббіджа, він, проте, використовував у задуманому ним комп’ютері принципи булевої алгебри. В кінці 30-х – початку 40-х років ним було побудовано у домашніх умовах декілька рахункових машин і комп’ютерів для здійснення складних інженерних розрахунків (Z1, Z2 – перша буква від прізвища Zuse). У роботі йому допомагали лише кілька друзів, знайомі виділили Цузе невелику суму грошей на його дослідження. Слід зазначити, що тоді як за розробниками американських автоматичних обчислювальних систем стояли цілі університети, Міністерство оборони США і такі могутні компанії, як IBM, Цузе діяв самостійно, на свій страх і ризик.Машина Цузе складалася з кількох блоків: керуючий пристрій, обчислювальний блок на основі електромеханічних реле, пристрій введення-виведення і, нарешті, пам'ять! Останнє варто відзначити особливо: саме Цузе створив перший зразок механічної «оперативної пам'яті» (на основі рухливих металевих стрижнів) і отримав на нього патент в 1936 р. Таким чином, його пристрій був здатний зберігати у своїй пам'яті проміжні результати розрахунків, а значить, і виконувані ним операції могли бути набагато сложніші.Машини Цузе управлялися за до програми на перфорованій стрічці, яка виготовлялась з бракованої кіноплівки (через дефіцит паперу у роки війни). Як основні елементи машин використовувалися електромеханічні реле.
4,6(48 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ