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

Смешная задачка в одну строку...

Оу, не успел)

Я знаю, что хранится только 1 число, это количество

Но по-сути в начале то последовательность)

Ну и зачем его хранить, если уже вывели? ))) Вам даже компилятор даст предупреждение, что этого не надо делать)))

Он этого не сделал(

Да ну? "e.pas(2) : Переменной 'a' присвоено значение, но оно нигде далее не используется"

А можете эту же программу написать с использованием цикла с параметром

Просто мы такое еще не проходили

Если "не проходили", значит и не будете проходить.

// PascalABC.NET 3.3, сборка 1634 от 14.02.2018// Внимание! Если программа не работает, обновите версию!begin  ReadSeqIntegerWhile(t->t<>0).Count.Printlnend.

//PascalABC.NET//Версия 3.3, сборка 1611 (06.01.2018)begin  var a:=ReadSeqIntegerWhile(t->t<>0).Count.Println;end.Пример:1 2 3 4 5 6 7 8 9 09