Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
isa2221
04.03.2020 22:27 •
Информатика
Паскаль, цикл while,
запрашивать числа до тех пор пока их сумма не станет > =100,вывести количество чисел
Ответ:
крутой1337228
27.08.2020 19:03
var a,b,c:integer;
begin
b:=0;
while b<=100 do
begin
readln(a);
b+=a;
c+=1;
end;
write(c);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
kpy4
22.05.2020 05:20
Решить до завтра: написать программы и блок-схемы: 1). для различных вводимых с клавиатуры целых чисел, найдите сумму положительных чисел 2). дано положительное число а. найдите...
twitder122
24.03.2022 08:41
Что произойдет, если использовать инструмент ИЗМЕНИТЬ РАЗМЕР, не выделяя область?1.изменится размер фрагмента, 2.который выделяется по умолчанию3.изменится размер всего изображения4.ничего...
мак119
06.05.2023 15:31
Палитра цветов состоит из двух цветов (черный и белый ( какое количество информации потребуется для каждой точки...
оля1911
06.05.2023 15:31
Объясните,какую информацию можно считать достоверной,полезной,,актуальной,понятной и полной? или примеры систем кодирования сообщений заранее всем тем кто пожертвовал пару своих...
vovazvyagin
16.05.2021 02:42
1. какое значение примет переменная b в результате деятельности алгоритма а) и б): а) алгоритм a: = 9 b: = a mod 5 b: = b*10 a: =b div 5-3 б) алгоритм a: = 123 b: = a div 10 b:...
Бота157
11.06.2020 06:18
Составить таблицу истинности для закона поглощения в логике...
Ромзэс1
01.04.2020 17:39
Что является результатом этапа формализация решения на компьютере? а) словесная информационная модель б) модель в) алгоритм г) программа...
lenabejenar
01.04.2020 17:39
Вубывании от большего к меньшему: скобки, div mod, сложение, функции..скажите,...
Bksd
20.05.2021 09:41
1. что такое сервер в бд? 2. зачем нужны бд? 3. какие программы для создания бд вы знаете? 4. для чего нужны связи? 5. чем отличается «режим редактирования» и «режим таблицы»?...
LeylaL11
20.05.2021 09:41
Отметьте единицу измерения размера символов. a) пиксель b)пункт c)дюйм d)миллиметр заранее...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a,b,c:integer;
begin
b:=0;
while b<=100 do
begin
readln(a);
b+=a;
c+=1;
end;
write(c);
end.