Вывести номер позиции с которого строка форма входит в строку информатика. паскаль

Var x:integer;s1,s2 : string;begins1:='информатика';s2:='форма';x:=Pos(s2,s1);writeln (x);end.

3