Паскаль (abc), составить полную рабочую программу - вопрос №10966046 от Danay2908 28.03.2022 20:19

Question

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

Danay2908 · 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....