Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
hromgugd
20.12.2020 06:05 •
Информатика
Напишите программу, которая вводила бы целые числа и суммировала их до тех пор, пока пользователь не ввел число 0
Показать ответ
Ответ:
cnastya970
20.06.2020 07:48
Var
a,s:integer;
begin
s:=0;
repeat
readln(a);
s:=s+a;
until a=0;
writeln('Сумма чисел: ',s);
end
0,0
(0 оценок)
Популярные вопросы: Информатика
Asbvd
25.05.2021 17:33
Создайте новый файл 10.html со следующей таблицей: ширина таблицы - 500 ширина 1 ячейки - 150 ширина 2 ячейки - 350 нужен код написанный в блокноте на это ....
didarabeketova
20.06.2021 08:20
1) дано линейное уравнение: ах+b=0 решить его в соответствии с параметрами а и b. 2) найти вещественное в корне квадратное уравнение ax^2+bx+c=0. программирование...
fukk123Q
20.06.2021 08:20
Составьте программу нахождения суммы всех целых чисел в диапазоне от -5 до n...
verik2643
12.04.2023 01:46
Составе программу вычисления произведения натуральных чисел от 7 до 27...
soffffa0790
12.04.2023 01:46
Выходные данные даны три натуральных числа a, b, c, записанные в отдельных строках. определите, существует ли треугольник с такими сторонами ( использовать неравенство...
Halimali10
09.09.2022 10:02
Два массива по 20элементов(натуральные числа от 1 до 12) . сколько пар из 2 массивов...
Gangstar777437g
27.04.2023 22:21
Здесь отрицаемое шифрование это абсолютно два одинаковых текста только символы другие. там 2 слоя шифрования, как мне известно первый слой на питоне расшифровывается...
nastabugrim
25.03.2023 16:26
Дано целое число больше 999.используя одну операцию деления нацело и одно опереацию взятия остатка от деления, найти цифру,соотвевщию разряду тысяч в записи этого...
alexeypimkin
20.02.2021 04:06
Расставьте знаки , ,= в следующей цепочке: 20 байт…1000 бит…1 мбайт…1024 кбайт…1 гбайт...
Ujwy
20.02.2021 04:06
Определить информационный объем слова тетрадь: a)8 байт b)7 кбайт c)56 бит d)12 байт...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a,s:integer;
begin
s:=0;
repeat
readln(a);
s:=s+a;
until a=0;
writeln('Сумма чисел: ',s);
end