• Дана последовательность чисел: 26, -53, 0, -67, 12, -34, 0, 90, 14, -78, 0, -45, 66.Найди количество отрицательных чисел,

Ответы 1

  • program zz1;const n = 13; // задаем количество элементов в массивеR:array [1..n] of integer=( 26, -53, 0, -67, 12, -34, 0, 90, 14, -78, 0, -45, 66 ); // задаем последовательность чиселvar i, k, m:integer; // задаем переменные целого типаbeginfor i:=1 to n do // организуем цикл, в котором переберем все элементы массиваbeginif R[i] < 0 then k:=k + 1; // проверяем, если элемент отрицательный, то считаем егоif R[i] > 0 then m:=m + R[i]; // проверяем, если элемент положительный, то добавляем элемент в суммуend;writeln( \' количество отрицательных = \', k); // выводим ответwriteln( \' сумма положительных = \', m); writeln( \' среднее значение = \', m/13); end.

    • Автор:

      pecan
    • 2 года назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years