Дана строка, содержащая два слова, разделенные знаком нижнее подчеркивание.Написать программу заменяющую нижнее подчеркивание на запятую и вставляющую после запятой пробел.
Дана строка, содержащая пробел. Написать программу, меняющую местами части строки до и после пробела и добавляющую в конец строки вопросительный знак.

1.var s:string; p:integer;beginreadln(s);p:=pos('_',s);delete(s,p,1);insert(', ',s,p);writeln(s);end.Пример:program_beginprogram, begin2.var s:string; l,p:integer;beginreadln(s);l:=length(s);p:=pos(' ',s);s:=copy(s,p+1,l-p+1)+' '+copy(s,1,p-1)+'?';writeln(s);end.Пример:program beginbegin program?