В простую переменную последовательно вводятся N чисел, отличных от нуля. Положительные или отрицательные числа завершают последовательность и сколько их
Числа: отрицательные, положительные или ноль. Ноль не вводится. Остальные фактически завершают ввод. Думаю, что ответ: всего одно число будет введено при таких условиях
Нужно составить программу, которая будет это делать.
pascal// var n,count:integer; count:=1; repeat inc(count); readln(n); until n<>0; writeln('Всего: ',count);
Если честно, вчитавшись в условие задачи, задание получается какое-то странненькое
В предыдущем комментарии ошиблась count:=0;
Спасибо