Ребят, помогите с программированием...

Question

Надо написать проги на паскале... 
Пользователь ввел n вещественных чисел. Найти: 
1.Сумму максимального и минимального из всех чисел. 
2.Сумму последних трех чисел 
3.Сумму всех положительных чисел. 
4.Разность первого и последнего чисел. 
5.Среднее арифметическое всех чисел. 
6.Произведение всех чисел, больше 5. 
7.Среднее геометрическое всех чисел 
8.Сумму первого, среднего и последнего чисел. 
9.Произведение суммы первых двух чисел на сумму последних двух чисел. 
10.Целую часть от частного минимального и последнего из чисел.

Каждая отдельно

Александра Глухова · Accepted Answer

Это в Одну прогу напихать надо? 
 
uses math; 
var a:array of real; 
 i:byte; 
 s:real; 
begin 
setlength(a,11); 
for i:=0 to 10 do 
 begin 
 a:=i*1.1; 
 write(a:0:1,' '); 
 end; 
writeln; 
s:=Minvalue(a)+MaxValue(a); 
write(s:0:1); 
readln 
end. ------------это Мак и Мин