Задача должна быть решена на языке Паскаль

// PascalABC.NET

uses System.Globalization;

begin

 CultureInfo.CurrentCulture := new CultureInfo('ru-RU');

 var t:= DateTime.Parse('05.05.2012 17:05:05');

 t := t.AddDays(500);

 t := t.AddHours(50);

 t := t.AddMinutes(50);

 t := t.AddSeconds(50);

 Print(t)

end.

я бы сделал

program p_1; var a,b: real; beginwriteln ('vvedite 1-oe'); read (a); writeln ('vvedite 2-oe'); read (b); if (a> b) thenbegin writeln ( ' 1-oe bolshe (',a,')' ); end; if (a< b) thenbegin writeln ( ' 1-oe menshee. bolshe vtoroe (',b,')' ); end; if a=b thenbegin writeln ('oni ravni'); end; end. 

режим разметки страницы,режим структуры,режим чтения.режим веб документа-