СМ Светлана Муслимова Помогите пожалуйста решить задачу в паскале ооооочень надо. Все буквы стоящие на нечетных местах заменить на знак ?
АА Александр Андреев var s:string; i:integer; begin readln(s); for i:=1 to length(s) do if odd(i) then s[ i]:='?'; writeln(s) end.