
На экран вводится последовательность натуральных чисел, не превышающих 1000. Последовательность
заканчивается числом 0. Количество чисел в последовательности не превышает 100. Выведите на экран количество чисел в последовательности (не считая 0), а потом сами числа. Пример ввода: 1 3 5 0

Ответы на вопрос

b,i:integer;
begin
b:=0;
for i:=1 to 100 do begin read(a[i]);
if a[i]<>0 then b:=b+1 else break;
end;
for i:=1 to b do
write(a[i],' ');
writeln;
writeln('Количество чисел в последовательности = ',b);
end.



Задача: Вывод количества чисел в последовательности
Данная задача заключается в выводе количества чисел в последовательности, а затем выводе самих чисел. Последовательность вводится на экран и состоит из натуральных чисел, не превышающих 1000. Последовательность завершается числом 0. Количество чисел в последовательности не превышает 100.
Решение:
Для решения данной задачи, мы можем использовать цикл, который будет считывать числа из ввода, пока не будет введено число 0. В процессе считывания, мы будем подсчитывать количество чисел и запоминать сами числа в список. После окончания ввода, мы выведем количество чисел и сами числа на экран.
Вот пример решения на языке Python:
```python # Инициализация списка для хранения чисел numbers = []
# Считывание чисел и их подсчет while True: num = int(input()) if num == 0: break numbers.append(num)
# Вывод количества чисел и сами числа print("Количество чисел:", len(numbers)) print("Числа:", *numbers) ```
Пример использования:
Входные данные: ``` 1 3 5 0 ```
Вывод: ``` Количество чисел: 3 Числа: 1 3 5 ```
В данном примере, вводится последовательность чисел "1 3 5 0". Программа выводит количество чисел в последовательности (3) и сами числа (1, 3, 5).


Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili