pascal.текстовые файлы, очень нужно

[Wustr39]

нужно решить для зачета, помогите. пожалуйста
№1. напишите программу, позволяющую создать текстовый файл, вывести на экран текстовый файл, переписать из файла нечетные строки в обратном порядке в другой текстовый файл.вывести на экран полученный файл.


№2 напишите программу, позволяющую создать текстовый файл( на каждой строке находится несколько чисел, разделенных пробелом).вывести на экран текст файл, определить и вывести на экран сумму честных чисел

Заранее большое спасибо

[Stilet]

Ну а наработками похвастаться?

[Wustr39]

Program file11;

Uses crt;

Var f,g:text;

s:string;

k,i:integer;

Begin

assign(f,'in4.txt');

assign (g,'out4.txt');

reset(f);

rewrite(g);

while not eof(f) do

begin

readln(f,s);

for i:=length(s) downto 1 do

begin

write(g,s[i]);

end;

Writeln(g);

end;

close(f);

close(g);

end.

[Дарья666]

ПАСКАЛЬ...Дана целочисленная прямоугольная матрица. Определить:
кол-во столбцов, не содержащих ни одного нулевого элемента ( оформить в виде функции );
Характеристикой строки целочисленной матрицы назовем сумму ее положительных четных элементов. Переставляя строки заданной матрицы, расположить их в соответствии с ростом характеристик.(оформить в виде процедуры).