Ракета

Введите с клавиатуры одномерный массив F(T), элементами которого являются положительные и отрицательные целые числа. Найдите среднее арифметическое значение четных и нечетных элементов массива, сравните значение между собой, определив минимальное. Сформируйте новый массив E(N), состоящий из элементов массива F(T), которые больше найденного минимального значения

Дано целое число A. Найти сумму, количество и среднее арифметическое цифр данного числа, больших некоторой произвольной цифры d. Все результаты вывести на рабочий лист EXCEL

Как правильно надо заниматься сексом?

Дана строка текста, в которой слова разделены пробелами. Исключить из строки все слова с нечетными номерами, оставшийся текст вывести на экран. в Pascal

ракета запускается с земли со скоростью V(км час) в направлении движения земли по орбите вокруг солнца. составить программу,определяющую результат запуска ракета в зависимости от скорости V.
Известно,что при V16,4 ракета покинет солнечную систему.

это его последний элемент, разве нет?
Код:

program s1;
var x, i:integer;
al, tl: array of real;
begin
writeln ('Введите количество ступеней ракеты'); read (x);
setlength (al, x);
setlength (tl, x);
for i:=1 to x do begin
writeln ('Введите ускорение ', i, ' ступени'); read (al[i]);
writeln ('Введите время работы ', i, ' ступени'); read (tl[i]);
end;
end.
P.S.: Переписать массив в статический не предлагать, нужен именно переменной длины. Заранее спасибо.

самолётов,звёздами и планетами, подводной лодкой, живыми объектами, предприятиями и организациями. помогите с вариантами