Очень нужна помощь!!!Написать программу в КуМире,которая меняет главную и побочную диагональ матрицы размером 3х3.

program pr9;
type mas= array[-10..10] of integer;
const n = 5;var s,i:integer;a:mas;
begin
writeln('Номера четных отрицательных элементов:');
s:=0;
for i:=1 to n do begin
readln(a[i]);
end;
for i:=1 to n do begin
if (a[i]<0)and(a[i] mod 2=0)then
begin
write(i,' ');
s:=s+a[i];
end;
end;
writeln;
writeln('Их сумма=',s);
end.

Какое число записано римскими цифрами ZZMCDXXV

текст.

3)Написать программу, которая определяет является ли слово палиндромом.

4)Написать программу, определяющую какая из букв а или о встречается в тексте первой.

Помогите хотябы одну пожалуйста))Нужно до завтра!))

1)с помощью генератора случайных чисел создать Н числа в диапазоне с [-50;50](длину массива Н надо ввести с клавиатуры)
2)надо вывести сделанный массив на экран
3)нужно вычислить и вывести,какое количество парных чисел
4)и вывести на экран все парные числа.
Очень вас прошу помогите,очень нужно до завтра сделать.Если можете помочь мне,пожалуйста помогите.

меньше 52.

2)В результате работы некоторой подпрограммы вычислены значения четырех переменных a, b, c, d. Написать на предложенном в пункте а) языке программирования программу, после работы которой в случае, если сумма положительных значений (среди a, b, c, d) больше 20, значение g равно наибольшему из a, b, c, а в остальных случаях значение g равно значению d. (В программе можно использовать новые переменные.)