Войти Регистрация Спроси ai-bota

Напишите программу, которая в последовательност натуральных чисел определяет, все ли числа в последовательности трехзначные. программа получает на вход последовательность чисел заканчивающимся нулем. вход: 35,717,405,225,0 выход: no

Ответ:

ABILAIKhan

08.10.2020 15:39

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
if ReadSeqIntegerWhile(t->t<>0).Any(t->(t<100) or (t>999)) then
Writeln('No')
else Writeln('Yes')
end.

Пример
35 717 405 225 0
No

0,0(0 оценок)

Популярные вопросы: Информатика

renatadautova

11.12.2021 05:28

Создать приложение для вычисления произведения исходного числа и числа 9....

Александра894312

13.02.2023 06:12

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

barsik20002

24.04.2020 11:35

Считая, что каждый символ кодируется одним байтом, определите чему равен информационный объем сообщения: Эта пища полезная, в ней много витаминов *...

leravolk399

25.05.2022 00:24

Составить блок-схему на языке паскаль. двумерный массив l задан при генератора случайных чисел из интервала [+1,+5]. подсчитайте произведение элементов данного массива, которые...

Ardak123

25.04.2020 12:02

Дан программный код (будет на четырех языках): найдите минимальное целое положительное число, которое нужно подать на вход программе, чтобы на выходе получить значение 19. в ответе...

gta1234657

12.05.2020 05:03

Радиопередатчик в течение 15 минут передавал сообщение со скоростью 20 байт в секунду. сколько символов содержало данное сообщение, если дополнительно известно, что для его записи...

daffidovа

12.05.2020 05:03

Наиболее известные из непозиционных счислений является римская нумерация. в ней семь цифр : i ,v,l,c,d,m .ни означают соответствие : 1,5,10,50,100,500,1000.есле меньше стоит справа...

volkego2015

12.05.2020 05:03

Сколько информации можно напечатать на листе а4...

dominika6

12.05.2020 05:03

Водной семье было много детей. 7 из них любили капусту, 6 – морковь, 5 – горох, 4 – капусту и морковь. те. кто любили горох, не любил ни капусту, ни морковь. сколько детей было...

Joon321

12.05.2020 05:03

Сколько бит в пословице без труда не выловишь и рыбку из пруда...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку