Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
valeraadyan
22.05.2022 10:33 •
Информатика
№1 найдите среднее арифметическое всех целых чисел от a до b( значения a и b вводятся с клавиатуры)
Показать ответ
Ответ:
Ангелина545454
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 оценок)
Популярные вопросы: Информатика
Yaroslava0111
19.01.2021 14:05
1.перечислите основные операции над объектами векторной графики? 2.в каком графическом редакторе можно менять порядок расположения объектов?...
Boxing12474
26.12.2022 22:01
Дано целое трехзначное число x.выполните алгоритм для x=192 найдите значение переменный a,b,c,s.чем является s этого алгоритма? a: =x div 100; b: =x mod 100 div 10; c: =x mod 10;...
pastor741
16.02.2023 18:20
1. пойми закономерность и продолжи числовой ряд какое следующее число? 2, 9, 10, 12, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29 ,...
mirnillas
03.04.2022 06:39
Какое количество информации содержится в цветной фотографии размером 20*20 см, воспроизведенной при растра с разрешением 60 мочек/см? !...
GoldGriffon
21.09.2022 20:10
Даны действительно числа x, y, z. вычислить u=max^2 (x, y, z) программу на паскале написать. ) вообще не понимаю...
Ученик2281337228
21.09.2022 20:10
Файл размером 40 кбайт передаётся через некоторое соединение за 80 секунд. определите размер файла (в кбайтах), который можно передать через это же соединение за 3200 секунд. в ответе...
German1224
02.03.2023 11:12
Как вычесть из 0,00001 число 101100001? (двоичная система) подробно, , ибо до меня не доходит....
danilasavap0a3nj
26.02.2022 01:56
Напишите программу печатающую номера элементов массива больших 30 (паскаль)...
ТОХА2287
18.03.2021 20:51
Дано условие. выбери верный ответ. if (a 90) or (b 90) or (c 90) then writeln ( треугольник - );...
Какаяразницакто
18.03.2021 20:51
Решить по информатике: 1)в статье 16 страниц.на странице 32 строки,а на строке 40 символов.определить объем статьи в кодировке unicode(кол-во бит на один символ 16 бит). 2)статья...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.