Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
SadDorry
24.06.2021 02:27 •
Информатика
№1 найдите среднее арифметическое всех целых чисел от a до b( значения a и b вводятся с клавиатуры)
Показать ответ
Ответ:
JustSuperDasha
22.07.2020 19:30
Var x, a, i, b:integer;
Begin
X:=0;
Readln(a,b);
For i:= a to b do x:=x+i;
Write(x/b);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
Арте2281337
04.03.2021 16:29
age = 10 if age == 10 :print( privet )... При выполнение этой программы будет ли выведено слово привет на экран?...
рикки8
02.06.2021 07:45
Дан одномерный массив, состоящий из N вещественных элементов. Ввести массив с клавиатуры. Найти и вывести минимальный по модулю элемент. Вывести массив на экран в обратном...
Babai7777
09.05.2022 13:50
Нужно рассчитать какое количество информации содержит ваши фамилия, имя, отчество и дата рождения при использовании 512-символьного алфавита? огнев евгений николаевич...
angelinachka3000
13.01.2023 22:26
Напишите среднюю/максимальную скорость передачи данных: cd,dvd, жесткий диск, flash - память....
ObolenskayaDiana
28.09.2020 08:23
Нужно написать в pascalabc программу на нахождение времени, потраченного на поездку из москвы в санкт-петербург на: поезде, велосипеде и самолёте. (находить точную скорость...
ДианкаСафонова
20.09.2020 17:44
Дан целостный ряд чисел от 0 до 1000. найти сумму и колличество чисел, кратных 5 и оканчивающихся на 0...
vladik33316
21.01.2023 16:12
Найди информационный объем сообщения 1 байт равен 8 битам в битах....
Кристина6965
14.05.2023 03:57
Що пересуває на рядок угору, вниз, ліворуч, праворуч вміст списку? А) Смуга прокручування; Б) вікно; В) папка....
baburinyaroslav
15.06.2020 07:19
Нужна в написании кода! Створіть вікно та побудуйте подію Button-1, що встановить розмір вікна 400х400 пікселів, фіолетовий колір фону і, замість тексту, заголовок на клас,...
mikhaillukashc
24.01.2023 22:46
Решите пропорцию 1 1/8 : 3 3/4 = x : 2 1/3...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Begin
X:=0;
Readln(a,b);
For i:= a to b do x:=x+i;
Write(x/b);
End.