Сделайте программу в паскаль .! с клавиатуры вводится дата в формате чч.мм.гг. определить предыдушюю дату. например для даты 1.10.15. нужно вывести 30.09.15

begin

 var c := ReadlnString('Введите дату в формате чч.мм.гг:');

 var d: DateTime;

 if DateTime.TryParse(c, d) then

 begin

   d := d.AddDays(-1);

   $'{d:dd.MM.yy}'.Println

 end

 else Println('Вы ошиблись при вводе')

end.