//PascalABC.Net 3.1.0.1200 uses System; var d: DateTime; s: string;
begin s := ReadlnString('Введите дату в формате "dd.MM.yyyy"'); d := DateTime.ParseExact(s, 'dd.MM.yyyy', System.Globalization.CultureInfo.InvariantCulture); writeln(d.AddDays(1).ToString('dd.MM.yyyy')); end.
Answers & Comments
Verified answer
//PascalABC.Net 3.1.0.1200uses System;
var
d: DateTime;
s: string;
begin
s := ReadlnString('Введите дату в формате "dd.MM.yyyy"');
d := DateTime.ParseExact(s, 'dd.MM.yyyy', System.Globalization.CultureInfo.InvariantCulture);
writeln(d.AddDays(1).ToString('dd.MM.yyyy'));
end.