Павел
?>

Соотнеси термин со значением. Фишинг Кибербуллинг Сетевой этикет Спам Размещение в Сети издевательских карикатур и обидных прозвищ жертвы. Вредоносная рассылка писем не заинтересованным в этом пользователям. Не запрашивать без надобности подтверждение получения сообщения. Сообщение о выигрыше приза, для получения которого просят отправить деньги на почтовые расходы. Назад Проверить

Информатика

Ответы

Anna-Miron

фишинг- 4

Кибер буллинг- 1

сетевой этикет- 3

спам- 2

elmira070485
Var a: array[1..10] of integer;
    b: array[1..10] of real;
    i,n: integer;
    s: real;
begin
  s:=0; n:=0;
  write('массив a:  ');
  for i:=1 to 10 do
  begin
    read(a[i]);
    if a[i]<0 then 
    begin
      s:=s+a[i];
      n:=n+1;
    end;  
    write(a[i],' ');
  end;
  s:=s/n; 
  writeln;
  writeln('среднее арифметическое отрицательных: ',s);
  writeln('количество отрицательных: ',n);
  write('массив b:  ');
  for i:=1 to 10 do
  begin
    if a[i]<0 then b[i]:=s
    else b[i]:=a[i];
    write(b[i]:7:3);
  end;
end.

массив a:  2 2 -3 1 -5 -6 -5 9 -7 5 
среднее арифметическое отрицательных: -5.2
количество отрицательных: 5
массив b:    2.000  2.000 -5.200  1.000 -5.200 -5.200 -5.200  9.000 -5.200 5.000
lion13
Вот если 1 число или более

#include <iostream>
#include <vector>

using namespace std;

int main()
{
    vector<int> a;
    bool flag = false;
    int n;
    cin >> n;
    a.resize(n);
    for (int i = 0; i < n; ++i) {
        cin >> a[i];
    }
    for (int i = 0; i < n; ++i) {
        if (a[i] < 0) {
            flag = true;
            break;
        }
    }
    if (flag)
        cout << "YES";
    else
        cout << "NO";
    return 0;
}

Вот если 2 или более

#include <iostream>
#include <vector>

using namespace std;

int main()
{
    vector<int> a;
    bool flag = false;
    int n, cnt = 0;
    cin >> n;
    a.resize(n);
    for (int i = 0; i < n; ++i) {
        cin >> a[i];
    }
    for (int i = 0; i < n; ++i) {
        if (a[i] < 0) {
            cnt++;
            if (cnt == 2) {
                flag = true;
                break;
            }
        }
    }
    if (flag)
        cout << "YES";
    else
        cout << "NO";
    return 0;
}

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Соотнеси термин со значением. Фишинг Кибербуллинг Сетевой этикет Спам Размещение в Сети издевательских карикатур и обидных прозвищ жертвы. Вредоносная рассылка писем не заинтересованным в этом пользователям. Не запрашивать без надобности подтверждение получения сообщения. Сообщение о выигрыше приза, для получения которого просят отправить деньги на почтовые расходы. Назад Проверить
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

tanu0618
Андрей-Викторовна1910
Составьте блок схему нахождения a=3b+x
АлександрАлина
Alenachernika9111
samogon-mozhaisk
самир1078
svetkaiv
Voshchula David393
smirnovaL1286
osnovnoisklad3551
angelina-uj1350
Дмитрий-Олейникова
vypolga1347
Galiaahmatova4447
allo22-27