Вычислите среднее арифметическое наибольшего и наименьшего из n чисел. язык программирования паскаль.
nagibator893067TITAN
3
02.03.2019 02:00
1
Другие вопросы по теме Информатика
tuysdik
29.04.2021 20:36
neznaika168
29.04.2021 20:38
svetik1310
01.07.2019 14:10
Vvaalleerriiaa
02.04.2019 19:29
Marlie
02.04.2019 19:29
Ильсяс
02.04.2019 19:29
maks737
02.04.2019 19:29
Fantik14rus
02.04.2019 19:29
vladykasevera
02.04.2019 19:29
Популярные вопросы
- Константин Леонидович взял кубик и написал на его гранях все числа от 11 до...
1 - Вася распилил квадратную дощечку со стороной 15 см на две прямоугольных дощечки....
2 - Пятиногий марсианин Но-о-сок собирается на вечеринку. Он держит в ящике комода...
3 - В некотором ноябре вторников оказалось столько же, сколько суббот, а сред...
1 - На стене музыкальной школы в ряд висят портреты великих композиторов (на каждом...
3 - Сколько есть четырехзначных чисел, у которых сумма цифр равна 9?...
1 - Где-то на сером поле спряталась змея Вероника в том положении, что и на портрете....
2 - В цирке имена одинаковых животных отличаются только первой буквой, а имена...
1 - В пачке было 23 сосиски в 5 связках. Две связки оказались по 3 сосиски и еще...
3 - В каждой клетке квадрата 4x4 стоит один островитянин. В некоторый момент каждый...
2
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.