Перечислите порядок действий для связи текста презентации гиперссылкой с электронной почтой

Паскаль авс. программа вывводит дату следующего дня. чтоб не утяжелять программу, не стал писать проверку правильности введения даты - то есть пользователь должен вводить только правильные цифры : ) program upmixer; var   day, month, year: integer; begin writeln('введите дату: '); write('день: '); read (day); write('месяц: '); read (month); write('год: '); read (year); day: =day+1; {если было введено 29 февраля високосного года} if mod 4)=0) and ((year mod 100)< > 0) and (month=2) and (day=30)) then   begin       day: =1;       month: =month+1;   end; {если было введено 28 февраля невисокосного года} if mod 4)< > 0) and (month=2) and (day=29)) then   begin       day: =1;       month: =month+1;   end; {другие дни} if ((day=31) and ((month=4) or(month=6) or (month=9) or (month= then   begin       day: =1;       month: =month+1;   end; if ((day=32) and ((month=1) or(month=3) or (month=5) or (month=7) or (month=8) or (month= then begin       day: =1;       month: =month+1; end; {31 декабря} if ((day=32) and (month=12)) then begin       day: =1;       month: =1;       year: =year+1; end; writeln('завтра ', day,' ',month,' ',year); end.