Copy funtzioa

function copy(DatuaDenKatea: StringDatuMota; NonHasi: integer; ZenbatKaraktere: integer): StringDatuMota;

Helburua: azpikate bat lortzea kate batetik.

Emaitza: kate bat, hasierako katearen hainbat karakterez osaturiko azpikatea.

program CopyAdibidea; { Copy funtzioa erakusten duen programa } var sEmaitza, sDatua: string; begin   sDatua := '1234567';   sEmaitza := copy(sDatua, 1, 2);   { sEmaitza:='12'   }   sEmaitza := copy(sDatua, 4, 2);   { sEmaitza:='45'   }   sEmaitza := copy(sDatua, 4, 8);   { sEmaitza:='4567' } end.