В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
lol1046
lol1046
03.02.2020 11:07 •  Информатика

Записать коды программ со алгоритмом для следующих рисунков

Показать ответ
Ответ:
берта2904
берта2904
19.10.2021 03:44

принцип доступности священного писания и его свободного истолкования открыл дорогу для бесконечного дробления христианства и появления самых различных исповеданий и толков.  

 

крупные церковные общины в протестантском мире не замедлили установить крепкие связи с государственным аппаратом. эти связи доходили до того, что церковь оказывалась под пятой владетельных князей, становясь частью бюрократического . весьма показателен в этом отношении пример церкви, которая возникла по королевской инициативе, короли и королевы официально являются главами этой церкви.  

 

как естественный результат слияния церкви и государства, многие страны охватили так называемые религиозные войны, в которых под флагом религии шла борьба за политические и интересы. известна своим печальным опытом тридцатилетняя война, швейцарские войны, междоусобицы во франции, крестьянская война в германии.  

 

следствием войн под религиозным прикрытием явилась распущенность в отдельных слоях протестантов. в угоду своим интересам некоторые люди стали извращать учение об оправдании верой. подобные явления имели место на ранней стадии реформации. лютер скорбел по поводу крестьян, впадавших в состояние крайней необузданности. «я верую, потому и буду спасен» , — заявляли нерадивые, попирая всякую мораль и нравственность.

объяснение:

0,0(0 оценок)
Ответ:
alecsandrkozevn
alecsandrkozevn
07.11.2022 05:50

Дано натуральное число N (N <= 32767) и N целых чисел, не превышающих по модулю 32767. Найти среднее арифметическое и сумму чисел, которые меньше его. Точность среднего арифметического - 5 знаков после запятой.

Формат вывода: среднее арифметическое и сумма чисел меньше его через пробел.


Код (Pascal)

var

 i, n: integer;

 a: array[1..32767] of integer;

 sr: real;

 sum: longint;


begin

 read(n);

 sr := 0;

 sum := 0;

 for i := 1 to n do

 begin

   read(a[i]);

   sr := sr + a[i];

 end;

 sr := sr / n;

 write(sr:5:5, ' ');

 for i := 1 to n do

   if a[i] < sr then sum := sum + a[i];

 writeln(sum);

end.


Тесты

Ввод:

3

1 2 3

Вывод:

2.00000 1


Ввод:

3

0 0 2

Вывод:

0.66667 0

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота