Advertisement
Varvara_Golovnova

Untitled

Jun 19th, 2024
27
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.22 KB | None | 0 0
  1. var
  2. s1,s2 : string;
  3. d1,d2 : longint;
  4. c1,c2 : char;
  5. begin
  6. readln(s1);
  7. readln(s2);
  8. readln(d1);
  9. readln(d2);
  10. readln(c1);
  11. readln(c2);
  12. s1[d1]=c1.
  13. s2[d2]=c2.
  14. writeln(s1);
  15. writeln(s2);
  16. end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement