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

Visiting456 Visiting456    1   30.03.2020 21:49    1

Ответы
лупапупа лупапупа  12.10.2020 09:53

===== PascalABC.NET =====

begin

 var s := ReadString;

 var i := s.LastIndexOf('т');

 if i < 0 then

   Print('Буквы "т" нет в данном слове')

 else

 begin

   Delete(s, i + 1, 1);

   Print(s)

 end

end.


Паскаль (abc), составить полную рабочую программу используя delete после того как с клавиатуры введу
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика