Задача
Вводится любое слово, например:
program
Пример вывода:
s[3]=o
Мое решение:
На выводе у меня появляется в конце лишний символ m
Вводится любое слово, например:
program
Пример вывода:
s[3]=o
Мое решение:
:
var s1,s2:string;
a:longint;
begin
read (s1);
s2:='o';
a:=pos(s2,s1);
writeln ('s[',a,']=',s2);
end.