Паскаль abc. Класс комплексные числа

[bublegoom]

как можно преобразовать record в class?Помогите пожалуйста!!:co nfused:

type complex=record
             re,im:real;
             end;
procedure Vyvod(var f:complex);
begin
if f.im<0 then writeln(f.re:9:5,' -',-f.im:0:5,'i')
else writeln(f.re:9:5,' +',f.im:0:5,'i');
end;
procedure Summa(f,g:complex;var z:complex);
begin
z.re:=f.re+g.re;
z.im:=f.im+g.im;
end;
var  a,b,c:complex;
begin
writeln('Vvedite deist. i mnim. chasti a:');
readln(a.re,a.im);
writeln;
writeln('Vvedite deist. i mnim. chasti b:');
readln(b.re,b.im);
writeln;
Summa(a,b,c);
write('A+B=');
Vyvod(c);
readln;
end.

[newerow1989]

type complex=class
             re,im:real;
             end;