Question

вводится женское имя, заканчивающееся на "а" или "я". составьте программу, которая выводит имя в уменьшительно-ласкательной форме. если имя заканчивается на "а", то к основе слова нужно добавить "очка", если имя заканчивается на "я", то к основе слова нужно добавить"ечка".
​

Answer 1

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

begin

 var s := ReadlnString('Введи имя:');

 case s.Last of

   'а': s := s[:s.Length] + 'очка';

   'я': s := s[:s.Length] + 'ечка';

 end;

 s.Println

end.