Question

Что будет выведено на экран после окончания работы программы?

s := '123456789';

Delete ( s, 1, 2 );

n := Pos ( '6', s );

writeln ( n );