Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
relax217
23.10.2021 17:19 •
Информатика
Пож 1 составить программу, которая бы запрашивала хнач , хкон , шаг c и определяла сумму всех отрицательных чисел от хнач до хкон с шагом с (решить , используя цикл с предусло-вием – while .. do).
Показать ответ
Ответ:
Retrostyle
28.09.2020 19:16
Var
x0, x1, c, sum: integer;
begin
sum:=0;
readln(x0, x1, c);
while x0<=x1 do
begin
sum:=sum+x0;
x0:=x0+c;
end;
writeln(sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ayazhka2
14.11.2021 01:42
Составьте блок-схему алгоритма нахождения значения выражения y=5/(x*(x-6))и рассчитайте метрики Джилба, Мак-Кейба и Граничных значений...
zenix122
26.07.2022 19:20
(ПАСКАЛЬ)Пиксели рисунка закодированы числами(обозначающими цвет) в виде матрицы,содержащей N строк и M столбцов.Выполните отражение рисунка сверху вниз: 1 2 3 7 8...
rage13371
04.02.2022 13:57
Известны длины сторон треугольника a, b, c. Написать программу, вычисляющую площадь этого треугольника (по формуле Герона). Выполнить программу для исходных данных...
ABI04
03.05.2022 08:43
1 Двусторонняя дискета имеет объем 1200 Кб. Сколько секторов на дорожке дискеты, если одна сторона содержит 80 дорожек и в каждом секторе по 4096 бит информации 2...
Agetnor
07.04.2022 11:32
1.Различия в поведении класса объектов и экземпляра того же класса: Выберите один ответ: имеются имеются, если у них есть общий предок не имеются не имеются, если...
irinairina12
05.01.2020 01:35
Сколько цыклов должно быть, что ы нарисовать квадрат в программе скреч?...
smirnovaanastas5
10.01.2022 12:52
Выбери верный ответ.Глава,пункт — это примеры разделов.ОпараграфОнет верного ответаОдокладыОвеб-страницы умоляю ...
NAZBEK
17.04.2021 21:52
Напишите список цифрового оборудования для создания графических и мультимедийных объектов (с назначением устройств)....
natalavorik
25.10.2021 08:06
выполнить задания в excel (название столбцов подписать самостоятельно и ещё можно после заданий построить диаграмму)...
Masha6655
17.04.2020 09:02
с Маткадом. 1. Какая переменная называется ранжированной? 2. Как определить ранжированную переменную с заданным шагом? Какой шаг по умолчанию? 3. Какие графики позволяет...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
x0, x1, c, sum: integer;
begin
sum:=0;
readln(x0, x1, c);
while x0<=x1 do
begin
sum:=sum+x0;
x0:=x0+c;
end;
writeln(sum);
end.