Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
йцукен56
24.04.2023 18:34 •
Информатика
Программа выводит целое положительное n (меньше 256) и вычисляет сумму и среднее арифметическое чисел от 1 до n.
Ответ:
Hikena
26.12.2020 17:23
var i,n,s:integer;
begin
readln(n);
s:=0;
for i:=1 to n do
s:=s+i;
writeln(s,s/n)
end.
Объяснение:
0,0
(0 оценок)
Популярные вопросы: Информатика
tinyshbaev
15.07.2022 23:17
Как выполняются команды в линейном алгоритме? ответьте на вопрос....
valerunik160val
15.07.2022 23:17
Составьте программу которая содержит функцию нахождения количества разрядов заданного числа не превосходящего 1000000000...
furymalice
15.07.2022 23:17
Напишите программу, определяющую количество и сумму элементов массива целых случайных чисел, больших 50 и меньших 60....
finn10
15.02.2021 00:01
1. Ниже приведена программа, записанная на языках программирования. Было проведено 9 запусков программы, при которых в качестве значений переменных s и t вводились следующие...
bulyginaap08na1
17.07.2022 00:17
Для выполнения каких действий используются инструмент вращения?...
FreedomLife1
20.08.2020 17:04
Укажите название оператора языка с++, который в операторе множественного ветвления switch выполняет значения по умолчанию...
zaqwsxcde
12.01.2021 00:38
Дан одномерный массив r (4,2,3,1,5,1,2,7,6) найти: 1. количество элементов 5 2. количество элементов 5 3. максимальный элемент и его номер 4. получить новый массив по правилу(...
DashaTopjfnfvv
07.10.2020 12:09
2. вывести на консоль значения первых десяти целых чисел при оператора цикла while....
Лера568687
17.02.2022 20:10
Назовём данную таблицу TEMPERATURA. Месяц 1 2 3 4 5 6 7 8 9 10 11 12 Температура −20 −16 −6 3 5 14 21 24 13 6 −5 −11 Тогда TEMPERATURA [3]=...
Loloshka321
03.08.2020 08:25
Запиши IP-адрес, если известно, чтоIP подсети: 127.77.0.0IP хоста: 0.0.178.205...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var i,n,s:integer;
begin
readln(n);
s:=0;
for i:=1 to n do
s:=s+i;
writeln(s,s/n)
end.
Объяснение: