Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
BD20051
06.08.2022 04:41 •
Информатика
Информатика , цикл while: найти сумму целых чисел в диапазоне от а до в
Показать ответ
Ответ:
Daffynsky01
04.08.2020 13:12
//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var (a,b):=ReadInteger2;
var s:=0;
while a<=b do
begin
s+=a;
inc(a);
end;
write('сумма: ',s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Ekaterina090909
23.03.2023 12:25
пусть в массиве хранятся следующие числа 3,4,7,1,8,2,5,4,6,9. Разработаете программу которая будет находить число, введенное пользователем и выводить индекс массива...
tylerxjosh
07.04.2020 22:38
Графическое изображение логического выражения называется: 1) Схема;2) Рисунок;3) Чертеж;4) График....
SalaevaDarina
16.05.2020 15:10
Представить числа в памяти компьютера 455 и -187...
karolinamurzak
02.02.2021 12:02
Var a,b,t,n,p : integer; function f(x: integer): integer; begin f : = 3*(9-x)*(9-x)+12; end; begin a : = -10; b : = 10; p : = 25; n : = 0; for t : = a to b do begin...
Anna14124
02.02.2021 12:02
Найти ошибку ax^+bx+c=0 описать программу #include iostream ; #include stdio.h ; #include math.h ; using namespace std; int main() {int a,b,c,d,x1,x2; cout a,b.c:...
Slrudyko
09.10.2022 13:14
Решите уравнение в pascalabc.net task(‘cif18’)...
sadyk771
09.02.2021 20:06
Пример циклического алгоритма,в виде блок схемы или словесного алгоритма....
az0967848
05.01.2021 21:28
Cоставить алгоритм для вычисления значения выражения z = (x - y)/2 + (x/6) заранее большое !...
AnnLage
22.04.2023 11:12
Почему усилилась роль государства в начале 20 века?...
DashaPOPOVA000000
22.04.2023 11:12
Древнегреческая владыка царства мёртвых ?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
//Версия 3.3, сборка 1634
begin
var (a,b):=ReadInteger2;
var s:=0;
while a<=b do
begin
s+=a;
inc(a);
end;
write('сумма: ',s);
end.