Вычислите среднее арифметическое наибольшего и наименьшего из n чисел. Язык программирования Паскаль.
5-9 класс
|
Ramil0310
17 окт. 2013 г., 2:46:11 (10 лет назад)
Alina4354
17 окт. 2013 г., 3:58:29 (10 лет назад)
var
s,a,n,i,min,max:integer;
begin
min:=32767;
max:=-32768;
readln(n);
for i:=1 to n do
begin
readln(a);
if a<min then min:=a;
if a>max then max:=a;
end;
s:=(min+max)/2;
writeln(s);
end.
Ответить
Другие вопросы из категории
статья набранная на компьютере, содержит 8 страниц, на каждой странице 40 строк, в каждой строке 64 символа. Информационный объем статьи составляет 25
килобайт. Определите сколько бит используется для кодировки каждого символа
Читайте также
Составить алгоритм на языке программирования , который выводит среднее арифметическое наибольшего и наименьшего из 20 элементов , имеющих значение из
интервала [-10;10]
Проблема с Паскалем. Мне надо посчитать среднее арифметическое всех отрицательных чисел в массиве из десяти элементов. Я понимаю, как сначала надо
распредилить, какие числа меньше нуля, но как вычислить среднее арифметическое, не зная точное кол-во отрицательных элементов? Желательно написать полной программой. Заранее спасибо с:
Написать программу, которая вычисляет среднее арифметическое вводимой с клавиатуры последовательности дробных чисел. Количество чисел должно задаваться во
время работы программы. (цикл для)(паскаль )
Вы находитесь на странице вопроса "Вычислите среднее арифметическое наибольшего и наименьшего из n чисел. Язык программирования Паскаль.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.