дана последовательность целых чисел, за которой следует 0. найти номер минимального элемента в этой последовательности.

ответ:  добавил <limits.h>, хотя на Visual С++ у меня без этого работало, и условие && a != 0 (что то не везёт мне с этой задачей)

#include <iostream>

#include <limits.h>

using namespace std;

int main()

{

 int a, i, imin, amin;

 setlocale(LC_ALL, "Russian");

 cout << "Введите числа: ";

 i = 0;

 amin = INT_MAX;

 imin = 0;

 do {

   i++;

   cin >> a;

   if (a < amin && a != 0) {

     amin = a;

     imin = i;

   }

 } while (a != 0);

 if (i > 1)

   cout << "\n№ минимального элемента = " << imin << endl;

 else

   cout << "\nПоследовательность пустая" << endl;

 getchar();

}

// PascalABC.NET 3.2, сборка 1345 от 24.11.2016
// Внимание! Если программа не работает, обновите её версию!
begin
  var Z:=ArrRandom(ReadInteger('n='),1,99);
  Writeln('Массив Z'); Z.Println;
  Writeln('Массив X');
  var X:=Z[1::2].Select(p->p/2).ToArray; Swap(X[0],X[X.Length-1]);
  X.Println;
  Writeln('Массив Y');
  var Y:=Z[::2].Select(p->p/3).ToArray; Swap(Y[0],Y[Y.Length-1]);
  Y.Println
end.

Пример
n= 8
Массив Z
74 17 35 3 33 84 48 39
Массив X
19.5 1.5 42 8.5
Массив Y
16 11.6666666666667 11 24.6666666666667

1 непрерывный (сигнал)

2 ( происходит его) оцифровка

3 дискретный, цифровой (сигнал)

4  (называется) глубиной кодирования звука

5 (расчитать) информационный объем файла

6 (N-это) количество уровней громкости звука

7 (І-ЭТО) глубина кодировки звука

8 (зависит от) частоты дискретизации

9 глубины звука (за) секунду

10 (V- это) - частота дискретизации измеряется в герцах

(f -это) - глубина дискретизации измеряется в битах

(t-это) -время звучания или записи измеряется в секундах

(К определяет количество) каналов

если моно к= 1, если стерео к= 2, если квадро к= 4

Объяснение: