Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
kiryakuantseva
17.11.2020 20:53 •
Информатика
Написать ! дана непустая последовательность целых чисел, оканчивающихся нулем. найти количество всех членов последовательности.
Показать ответ
Ответ:
KVERCXI
08.10.2020 00:19
// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!
begin
ReadSeqIntegerWhile(t->t<>0).Count.Println
end.
0,0
(0 оценок)
Ответ:
sedoidenis2000
08.10.2020 00:19
//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 0
9
0,0
(0 оценок)
Популярные вопросы: Информатика
umidmadrimow580
10.09.2020 04:19
Как называются эти приложения??? ...
smelinkova
20.05.2022 10:33
Закодируй с шифра Цезаря (шаг позиции 5) слово КИЛОБАЙТ С азбука Морзе...
pech228
28.05.2022 06:03
Сколько единиц в двоичной записи десятичного числа...
plidap00rk7
01.03.2020 11:38
. Вычисли.112 . 4213 - 3332 - 3131 - 2...
кирилл2062
15.03.2020 07:34
Информатика 8кл,можно ответ и краткое пояснение...
лето1990
11.09.2020 15:23
Постройте таблицы истинности и нарисуйте логические схемы для следующих логических формул: 1. не А v не В ^ не С 2. А v не A ^ не B 3. C v (не С v B) ^ не А...
kalabukhovalina
20.07.2022 10:36
Составьте блок схему: Два шестых класса школы соревновались в беге на 300 метров. Напишите алгоритм, который представит (проведет симуляцию) результаты достижений учащихся...
Polyak56
28.02.2022 06:24
.выберете правильные настройки...
lod2003
12.06.2022 02:03
Іть будь ласка ♥️ мета: чому потрібно зберігати історичні пам ятки?...
Adelyasweet246
12.06.2022 02:03
Определите, в каких предложениях слово наконец является вводным, в каких - таковым не является. вставьте пропущенные буквы и расставьте недостающие знаки препинания....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// Внимание! Если программа не работает, обновите версию!
begin
ReadSeqIntegerWhile(t->t<>0).Count.Println
end.
//Версия 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 0
9