Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Sasho2325
16.04.2022 08:28 •
Информатика
По текст на паскале. среди чисел последовательност 1 , 2 , 4 , 8 , 16 , найдите количество чисел до первого шестизначного .
Ответ:
Maximka200117
08.10.2020 17:33
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
SeqWhile(1,t->2*t,t->t<100000).Count.Println
end.
Результат
17
0,0
(0 оценок)
Популярные вопросы: Информатика
SemyaTanya
12.04.2023 04:13
3D редактор терзесиннин аумагы калай аталады? жауабы; мәзір, примитивтер, сахна, камера....
19Otlichnik19
22.08.2022 09:35
Штирлицу удалось похитить пароль от сейфа с секретными материалами — группенфюрер мюллер неосторожно написал его на бумаге и, порвав на несколько частей, выбросил в урну. штирлиц...
fatima777799ozu0sv
22.08.2022 09:35
Цель работы: изучение методов разработки алгоритмов обработки многомерных массивов данных и их запись в виде блок-схем. : найти сумму элементов квадратной матрицы а[m, m], расположенных...
vvvtalik3
24.07.2021 01:13
Составить программу на turbo paskal: вычислить a в степени n (n 0),где а-вещественное число,которое необходимо возвести в целую положительную степень n....
Никита111116644
24.07.2021 01:13
Сколько двоичных символов в одной букве?...
vikabelaua114
19.01.2020 22:03
Для приготування розчину масою 300 г з масовою часткою солі 2% взяли солі:...
yevdokimenkoal
19.01.2020 22:03
Упражнения на употребление модальных глаголов can, must. Choose the right verb: can, must: 1. We … go to school every day, but Sunday and Saturday. 2. On weekends we … go to the...
ulzhan16061999
19.01.2020 22:03
Чому спроби здiйснення реформ, якi передбачали эвропеiзацiю Османськоi iмперii, провалилися.?...
нина568
28.11.2022 11:59
Уравнение для 6 класса, 0,3•(3•х)=0,9...
DeNcHiK123st
16.06.2022 17:26
Какой объём занимают принормальных условиях 20г углекислого газа CO2...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Внимание! Если программа не работает, обновите версию!
begin
SeqWhile(1,t->2*t,t->t<100000).Count.Println
end.
Результат
17