Паскаль. получить новую строку, заменив после первой * знаком - все последующие символы

Question

Информатика: Паскаль. получить новую строку, заменив после первой * знаком - все последующие символы

da0ri0da0 · Answer

Program chik;var a:string;l,i:integer;beginreadln(a);l:=length(a);a:=a[1];for i:=2 to l dobegina:=a+ * ;end;writeln(a);end....