Напишите программу на языке ПаскальABC для задания 3,4 . Тема ,,Перебор в строковых велечинах " .
Приложения:
![](https://st.uroker.com/files/054/054644f187223439901c8c321647adcc.jpg)
Ответы
Ответ дал:
1
PascalABC.NET
Задание 3:
- ### RS.Split(' ').Sel(w → w[^1] in ',!?.' ? w[:^1]+'сла'+w[^1] : w+'сла').Pr
Задание 4:
- ###
- var lat := 'shh sh zh ch je jo ju ja a b v g d e z i j k l m n o p r s t u f h x c w " y '' q'.Split(' ');
- var rus := 'щ ш ж ч е ё ю я а б в г д е з и й к л м н о п р с т у ф х х ц ш ъ ы ь э'.Split(' ');
- var s := RS;
- lat.ForEach((c,i) → begin
- s := s.Replace(c, rus[i]);
- s := s.Replace(c.ToUpper, rus[i].ToUpper)
- end);
- s.Pr
Приложения:
![](https://st.uroker.com/files/40c/40c765122050112c85cad86b39841fd6.jpg)
![](https://st.uroker.com/files/007/007506c94cce0189f3993c53437ec15c.jpg)
Вас заинтересует
1 год назад
1 год назад
1 год назад
6 лет назад
8 лет назад
8 лет назад