begin
var s := ReadlnString;
var d: DateTime;
if DateTime.TryParse(s, d) then $'{(d.AddDays(-1).Date):dd.MM.yy}'.Println
else Println('Неверная дата')
end.