Паскаль (abc), составить полную рабочую программу - вопрос №10966046 от На0вид0ангел 04.11.2020 07:29

Question

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

На0вид0ангел · 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....