Здравствуйте нужно! и как можно подробнее

1 -6 февраля. / понедельник.

2 - иа.

3 - число "1"

4 - печка.

5 - клюв.

6 - царь.

7 - марка.

8 - 10 гласных,21 согласная буква.(всего 33 буквы). - твёрдый,мягкий знак - не согласная не гласная.

s: = str(number);

for : = 1 to length(s)  div 2 do

  if s[i] < > s[length(s) - i + 1] then writeln("не палиндром")ж 

(я так понял масив(матрица) "состоящая из 5 строк и 10 столбцов заполненная случайными числами в диапазоне от 0 до 29" вводитса з клавиатуры) (я на паскале на ошибки не проверял)

program dl9_aridrettnir;

var a: array [1..10,1..5] of inteher;

sum: array [1..10] of integer;

i,q,j: integer;  

begin

writeln ('vvedit masiv ot 0 do 29');

for i: =1 to 10 do

begin

for q: =1 to 5 do begin

readln (a[i,q]);

end; end;

for i: =1 to 10 do

begin sum[i]: =0;

for q: =1 to 5 do begin

for j: =1 to 10 do begin 

sum[i]: =a[q,j]+sum[i];

end; end; end;

readln

end. 

таня ест картофель с томатами.