Что будет выведено на экран в результате выполнения фрагмента программы? Var s, t: string; begin s:='монитор'; writeln(length(s)); writeln(pos('o',s)); delete(s, 3,2); writeln(s); t:=copy(s, 3, 3); insert ('т',t,4); t[1]:=UpCase(t[1]); writeln(t); end.
7
2
мотр
ьтоТ