Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
olga7789
01.10.2021 00:10 •
Информатика
30 .составить блок-схему : определить среднее арифметическое последовательности чисел a[1], a[2], … a[n]. числа n, a[1], a[2], … a[n] вводятся с клавиатуры.
Показать ответ
Ответ:
fpu51810
20.09.2020 12:15
//Блок-схема во вложении
var n,a,i:integer;
r:real;
begin
readln(n);
for i:=1 to n do
begin;
readln(a);
r:=r+a;
end;
r:=r/n;
writeln(r);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Kiko2802
17.11.2022 12:30
Решить это информатика тема компьюторная графика...
trototil
24.11.2022 05:24
определите какое из указанных имен файлов НЕ удовлетворяет маске sys и напишите почему вы так считаете 1) syste.m 2) sys23.exe 3) system.dll 4) syszx.problem...
TIPOcrytou
22.04.2021 00:58
Написать программу в паскале ,которая вычисляет сумму ряда от 1 до n...
alenasen12345
22.04.2021 00:58
Сейчас мне в школу надо сейчас быстрее! сколько будет: 87 гбайт=сколько байтов 7мбайт=сколько байтов 76байт=сколько мбайтов 700000 бит= сколько кбайт 7 гб=сколько байтов...
nikTNG
22.04.2021 00:58
Для шифрования числового кода решили использовать изображение круглых часов с циферблатом и с тремя стрелками (часовой, минутной и секундной), и в качестве значений цифр...
НикВероник1
15.05.2020 02:19
1) вводится три числа. найти среднее арифметическое и вывести его. 2) вводится три числа. найти сумму четных чисел. 3) вводится три числа, найти среднее арифметическое число...
Nusyaa
15.05.2020 02:19
Как называется договор между автором и пользователем, который даёт пользователю право использовать программу и определяет условия этого использования?...
2303901
09.12.2021 19:53
Составить блок схему ,по которой можно будет составить программу 7....
Аделя0504
02.07.2021 08:19
Народження такого що волю в панів одніми передбачив (передбачила)...
niktoto
14.08.2022 12:07
Как раскрывает Распутин проблему контраста между деревенской и городской жизнью?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var n,a,i:integer;
r:real;
begin
readln(n);
for i:=1 to n do
begin;
readln(a);
r:=r+a;
end;
r:=r/n;
writeln(r);
end.