Паскаль (abc), составить полную рабочую программу - вопрос №10965369 от shalamova07200 04.07.2021 13:02

Question

Информатика: Паскаль (abc), составить полную рабочую программу используя delete после того как с клавиатуры введут слово, нужно удалить у него последнюю из букв т , если такая буква есть, если буквы нету, вывести буквы т нету в данном слове

shalamova07200 · Answer

===== PascalABC.NET =====begin  var s := ReadString;  var i := s.LastIndexOf( т );  if i 0 then    Print( Буквы т нет в данном слове )  else  begin    Delete(s, i + 1, 1);    Print(s)  endend....