Question

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

Answer 1

PascalABC.NET 3.4.2, сборка 1857 от 05.11.2018

Внимание! Если программа не работает, обновите версию!

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.