Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
назик31
08.07.2022 09:25 •
Информатика
Написать программу, вычисляющую среднее арифметическое n чисел, введенных с клавиатуры. цикл for; pascal.
Показать ответ
Ответ:
Lizaveta9999
08.10.2020 02:30
Const n = 10;
var b: Integer;
var a: array[1..n] of integer;
begin
for var i := 1 to n do
begin
Read(a[i]);
b+=a[i];
end;
Writeln(b/n);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
katyamosondz
09.12.2022 03:06
56) в некоторой стране автомобильный номер состоит из 8 символов. первый символ – одна из 26 латинских букв, остальные семь – десятичные цифры. пример номера – a1234567. каждый...
1483983829
10.02.2021 01:08
1. Солайте проект для решения задачи в многострочном текстом поле содержатен преми, которое показал каждый и участников соревнований вашего учебного заведения в беге на дистанцио...
кракодиллох2
15.07.2021 11:33
Защита мини проекта мой кумир...
iNNA9078
15.01.2020 20:16
Расположите события в логической последовательности (от причины к последствиям): А. появление денег и обмена Б. Возникновение земледелия и скотоводства В. Возникновение первых...
GalaxyTuna
15.01.2020 20:16
Найдите скалярное и векторное произведение векторов: a = (-1; 0; 7), b = (-2; 1; 5)...
mrdaaly
15.01.2020 20:16
с задачками с задачками. >...
SleepCat12
15.01.2020 20:16
Виконайте синтаксичний розбір речень. 1. Багато городян прийшло послухати концерт. 2. Для добрих друзів відчиняю дім....
Tenwolf
31.07.2022 12:51
Решите Найдите 28% от числа 140...
abogdanov94
14.02.2023 05:34
Центр кола, описаного навколо рівнобічної трапеції, належить її більшій основі. Знайдіть радіус цього кола, якщо діагональ трапеції дорівнює 20 см, а проекція діагоналі на...
korsukova61oye48j
10.09.2021 03:25
Найти площадь фигуры ограниченной линиями: y=9-х²,у=0,х==0,х=2 ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var b: Integer;
var a: array[1..n] of integer;
begin
for var i := 1 to n do
begin
Read(a[i]);
b+=a[i];
end;
Writeln(b/n);
end.