informatika-2022-23: Pos funtzioa

2023(e)ko martxoaren 10(a), ostirala

Pos funtzioa

function pos(BilatzenDenKatea: StringDatuMota; KateNagusia: StringDatuMota): integer;

Helburua: azpikate bat beste kate baten barruan dagoen ala ez jakitea.

Emaitza: zenbaki bat, azpikateari dagokion lehen agerpenaren posizioa katean. 0 azpikatea ez dagoenean.

program PosAdibidea;

{ Pos funtzioa erakusten duen programa }

{ bilatzen den azpikatea kate nagusian badago Pos funtzioak azpikatearen lehen }

{ agerpenaren posizioa kate nagusian itzuliko dio modulu deitzaileari, eta }

{ bilatzen den azpikatea ez badago kate nagusian Pos funtzioak 0 itzuliko dio }

var

sEsaldia: string;

begin

sEsaldia := 'The first space in this sentence is at position: ';

writeln(sEsaldia, pos(' ', sEsaldia));

sEsaldia := 'The last letter of the alphabet doesn''t appear in this sentence ';