Вводить последовательность чисел до тех пор пока не введено ноль

Ответы:

Ришат Кузеев

04-05-2011 21:12

//Pascal ABC.NET v3.1 сборка 1219begin Var seq:=SeqWhile(ReadInteger(),x -> ReadInteger(),x -> x<>0).ToArray; seq.Print;end.Пример ввода:120Пример вывода:1 2

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Вікторія Спіцька

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Вводить последовательность чисел до тех пор пока не введено ноль» от пользователя Вікторія Спіцька в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!