дан файл f компоненты которого являются действительными числами найти произведение компонентов файла

Var
  f :Text;
  x, mult: real;

begin
  mult := 1;
  assign(f, 'F');
  reset(f);
  while not Eof(f) do
  begin
    readln(f, x);
    mult := mult * x;
  end;
  Close(f);
  writeln(mult);
end.

#include <iostream>

#include <vector>  

using namespace std;

int main(){

   setlocale(LC_ALL, "Russian"); //Чтобы на русском писать текст  

   int n, i;

   cout << "Введите количество элементов в массиве : ";

   cin >> n; //Ввожу количество элементов в массиве

   vector<int>  arr(n);// объялвяю массив с n элементами

   cout << endl << "Введите элеметы массива : \n";

   //И заполнение массива,  и замена элементов на -1 и 1 будут происходить в одном цикле)

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

       cin >> arr[i];//Заполняю массив

       if (arr[i] > 0)//Проверяю элемент и заменяю его, но не знаю, что с нулем делать  

           arr[i] = 1;// поэтому просто оставлю его :D

       if (arr[i] < 0)

           arr[i] = -1;

   }

   cout << endl << "Массив : ";

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

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

   cout << endl;

   system("pause");

   return 0;

}

Объяснение:

1. Да, цифровые технологии являются частным случаем информационных технологий.

2. Нет, не все информационные технологии являются цифровыми. Например процесс хранения информации путем записи ее с ручки в тетрадь, несомненно является информационной технологией, но не имеет отношения к цифровым технологиям.

3. Да, все цифровые технологии являются информационными, это следует из определения информационных технологий. (Процессы, методы поиска, сбора, хранения, обработки, предоставления, распространения информации и осуществления таких процессов и методов.)

4. Цифровая технология использует цифровое дискретное представление информации, как правило сигналами 1 и 0 (в некоторых случаях еще null), что позволяет широко использовать электронную вычислительную технику для организации информационных процессов.