Программа вводит две строки. Из более длинной строки программа выводит все символы, коды...

Question

Программа вводит две строки. Из более длинной строки программа выводит все символы, коды которых >70. В короткой строке заменяет все «!» знаки на «*» и выводит короткую строку на экран.

Answer 1

Как ни странно, но программа простенькая)))

PascalABC.Net 3.2 - и только на этой версии!!!

begin
  var s1:=ReadlnString('Строка 1:');
  var s2:=ReadlnString('Строка 2:');
  if s1.Length>s2.Length then Swap(s1,s2);
  s1:=s1.Replace('!','*'); s1.Println;
  s2.ToCharArray.Where(x->Ord(x)>70).Println
end.