juliaydodova
?>

Дан массив из 7 чисел, которые вводятся с клавиатуры, вывести на экран значения элементов массива. сосчитать произведение всех ненулевых элементов массива. pascal abc.net

Информатика

Ответы

Svetlana ALLA
Полная глупость: вводить с клавиатуры данные и тут же их выводить.

// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('П=',ReadArrReal('Введите 7 чисел:',7).Println.Where(x->x<>0).
      Aggregate(1.0,(x,y)->x*y))
end.

Пример
Введите 7 чисел: 3.5 -18.3 0 14 174.32 -15 0.17
3.5 -18.3 0 14 174.32 -15 0.17
П=398597.4972
nv6634

#include <iostream>

 

using namespace std;

 

int main()

{

   int *arr; // указатель для выделения памяти под массив

   int size; // размер массива

   

   // Ввод количества элементов массива

   cout << "n = ";

   cin >> size;

 

   if (size <= 0) {

       // Размер масива должен быть положитлеьным

       cerr << "Invalid size" << endl;

       return 1;

   }

 

   arr = new int[size]; // выделение памяти под массив

 

   // заполнение массива

   for (int i = 0; i < size; i++) {

       cout << "arr[" << i << "] = ";

       cin >> arr[i];

   }

 

   int temp; // временная переменная для обмена элементов местами

 

   // Сортировка массива пузырьком

   for (int i = 0; i < size - 1; i++) {

       for (int j = 0; j < size - i - 1; j++) {

           if (arr[j] > arr[j + 1]) {

               // меняем элементы местами

               temp = arr[j];

               arr[j] = arr[j + 1];

               arr[j + 1] = temp;

           }

       }

   }

 

   // Вывод отсортированного массива на экран

   for (int i = 0; i < size; i++) {

       cout << arr[i] << " ";

   }

   cout << endl;

 

   delete [] arr; // освобождение памяти;

   

   return 0;

}

mail9

1)Маленький это слово не подходит так как оно больше подходит для описания чего-то нового, а все остальные старого

2)злой не подходит потому-что это единственное отрицательное качество характера.

3)Оля- это единственное женское имя

либо Саша- это единственное универсальное имя

4)телега- не начинается на ко

5)сало- это не молочный продукт

6)танцевать- не как не связанно с речью.

7)светлый- не связанно с размером.

8)мазанка- это не постройка.

9)секунда- не связанна с расстоянием или размером.

10)пристава- не связанно с правилами русского языка

11)длина- это не геометрическая фигура

12)горячий-не связанно со вкусом

13)лампа-это не мебель.

14)отрезок- это не фигура.

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

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

Дан массив из 7 чисел, которые вводятся с клавиатуры, вывести на экран значения элементов массива. сосчитать произведение всех ненулевых элементов массива. pascal abc.net
Ваше имя (никнейм)*
Email*
Комментарий*

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

osipov1984osipov
alekseydovganich6
npprang21
ibzaira
alicia179
Олег1105
charlie79
albina6580
iraira761
Eduardovich
Korinchan390
lihacheva
Maionova
Руслан1360
Михайлов