Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
BlackGus007
15.11.2022 02:52 •
Информатика
Составить алгоритм среднего арифметического 7 введенных чисел
Показать ответ
Ответ:
alan550
20.07.2020 07:22
Var
s: real;
i: byte;
a: array [1..7] of integer;
begin
for i:=1 to 7 do
begin
writeln('Введите ', i, ' число: ');
read(a[i]);
s:=s+a[i];
end;
s:=s/7;
writeln('Среднее арифметическое: ', s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Наталья162345
23.09.2021 16:46
Задание на фотографии...
kotlaralina
26.09.2021 16:53
Напишите краткую сравнительную характеристику ахилеса и гектора@[email protected]...
kochanovaleksa
26.09.2021 16:53
Написать сочинение по мультфильму кунфу панда или гадкий я...
aslanəz
26.09.2021 16:53
Скільки завершених енергетичних рівнів є в атомах елементів з протонними числами 4,10,17?...
olgakorneva1
26.09.2021 16:53
Укажи вариант в котором даны существитеные. 2 склонения. а) озеро,река b) страна, дочь c) шкаф, компьютер d) тетя, дядя...
akovlevavika444
26.09.2021 16:53
Биссектриса расшифрованное слово - название , выходящего из угла и...
жигер21
26.09.2021 16:53
Скільки завершених енергетичних рівнів в атомах елементів з протонними числами 4,10,17...
MashaMalycheva
26.09.2021 16:53
Сложи каждый домик из деталей танграма начерти каждое решение и напиши номера использованных фигур если у тебя получилось не одно решение начерти их все...
SwanBlack
26.09.2021 16:53
Человек 3 км шел пешком а затем 20 км ехал на велосипеде. во сколько раз скорость езды больше скорость ходьбы если ехал он в два раза дольше чем шел...
sanzharzhumakhp0a0p5
26.09.2021 16:53
Строительство дороги заканчивалось ,также ....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
s: real;
i: byte;
a: array [1..7] of integer;
begin
for i:=1 to 7 do
begin
writeln('Введите ', i, ' число: ');
read(a[i]);
s:=s+a[i];
end;
s:=s/7;
writeln('Среднее арифметическое: ', s);
end.