Developing.ru

Ребят вообщем договорился я какой будет у меня билет на экзамене. А 3 задачки решить немогу((( Извиняюсь, знаю что проще некуда, но вечно находится проблема которую решить недоумеваю как... Помогите решить.

1)Задано 2 массива записей, каждый из которых содержит записи Фамилию и Адрес. Програмка должна переносить (в любом порядке) записи из 2-х массивов в 3-й, причем с 2-х одинаковых записей переносить только одну.
2)Выяснить область значений функции y=x/(sqr(x)-3x+1) и построить график функции.
3)Задаго матрицы а и б размером 6х6 каждая. Найти елементы матрицы с как пол суммы елементов матриц а и б соответственно.

Помогите прошу. Огромная благодарность заранее!!!
--------------------------------------------------------------------------------
Добавлено сообщение
--------------------------------------------------------------------------------
Одну вроде решил третью, и она работает Таким вот образом...

program ekz3;
uses crt;
const n=6;
m=6;
var a:array[1..n,1..m] of integer;
b:array[1..n,1..m] of integer;
c:array[1..n,1..m] of real;
x,i,j:integer;
begin
clrscr;
randomize;
for i:=1 to n do begin
for j:=1 to m do begin
a[i,j]:=random(10);
write(a[i,j]:2,' ');
end;
writeln;
end;
writeln('------------------');
for i:=1 to n do begin
for j:=1 to m do begin
b[i,j]:=random(10);
write(b[i,j]:2,' ');
end;
writeln;
end;
writeln('------------------');
for i:=1 to n do begin
for j:=1 to m do begin
c[i,j]:=(a[i,j]+b[i,j])/2;
write(c[i,j]:2:1,' ');
end;
writeln;
end;
writeln('------------------');
readln(x);
end.

Осталось 2 еще. Помагайте, бо выгонят нафиг