в PascalABC дана последовательность целых чисел,в этой последовательности есть два нуля,

В PascalABC дана последовательность целых чисел,в этой последовательности есть два нуля, размещаются они в различных местах, надобно найти количество чисел стоящих меж этими нулями.

Таисия Кабернюк 2019-09-05 04:39:11

Всегда только два нуля? или все же нулей может быть и больше, и меньше?

Иван Коргушов 2019-09-05 04:43:48

Если всегда два, то yfqnb

Рома Галаганов 2019-09-05 04:48:57

Входные данные какие? Количество чисел определено заблаговременно, или ввод кончается чем-то, либо вообщем подаётся в виде одной строчки?

Алиса Лоскот 2019-09-05 04:57:03

Если всегда ровно два, то Writeln(s.LastIndex('0')-s.IndexOf('0')+1)

Alehov Igorjan 2019-09-05 05:05:38

Уточнил, был неправ: Writeln(s.LastIndexOf('0')-s.IndexOf('0')-1)