Лера20061111111
30.01.2021 00:33

Для какого из приведённых имён истинно высказывание НЕ ( Последняя буква согласная ) И НЕ Первая буква гласная )?

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
ася704
14.08.2021 06:04

#include <iostream>

using namespace std;

int main()

{

   int a1 = 2;

   int d = -2;

   int amount = 0;

   int n;

   cin >> n;

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

   {

       amount += a1;

       cout << a1 << " ";

       a1 += d;

   }

   cout << endl << amount;

}

Объяснение:

#include <iostream> // Библиотека ввода - вывода

using namespace std; // Пространство имён

int main()

{

   int a1 = 2; // Первый элемент = 2

   int d = -2; // Разность = -2

   int amount = 0; // Сумма = 0

   int n; // Создание целочисленной переменной n

   cin >> n; // Ввод с клавиатуры

   for (int i = 0; i < n; i++) // Идём от нуля до n

   {

       amount += a1; // Суммируем элемент

       cout << a1 << " "; // Выводим элемент

       a1 += d; // Узнаём следующий элемент прогрессии

   }

   cout << endl << amount; // Выводим сумму

}

0,0(0 оценок)
Ответ:
chizhikovilya
17.01.2020 18:24
// PascalABC.NET 3.0, сборка 1128
begin
  var a:=ArrRandom(20,-10,19);
  a.Println(','); // 1
  var b:=ReadArrInteger('Введите 10 целых чисел',10); // 2
  Writeln('Количество положительных элементов ',
    a.Where(x->x>0).Count); // 3
  for var i:=0 to 19 do
    if a[i]<0 then a[i]:=0;
  Writeln('Массив А после замены отрицательных'); a.Println(','); //4
  Writeln('Сумма положительных элементов ',
    a.Where(x->x>0).Sum) // 5
end.

Тестовое решение:
14,8,9,-5,6,3,3,-10,-8,18,7,13,2,17,-1,0,4,-3,8,-8
Введите 10 целых чисел -5 0 13 -7 -14 11 8 19 -3 -1
Количество положительных элементов 13
Массив А после замены отрицательных
14,8,9,0,6,3,3,0,0,18,7,13,2,17,0,0,4,0,8,0
Сумма положительных элементов 112
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота