очень вас нужно очень

-пища для ума;
 -вразумительная; 
-Сообщение может пополнить знания человека,если содержащиеся в нем сведения являются для человека новыми и понятными. 
Вряд ли пополнит ваши знания, к примеру, такой вот текст, взятый, из математической энциклопедии: «Резонанс – явление увеличения амплитуды вынужденных колебаний при приближении частоты внешнего воздействия к одной из частот собственных колебаний динамической системы». Таким образом, информация понятна, если она выражена на языке доступном для получателя. Вместе с тем, совершенно понятное сообщение «Треугольник – фигура, имеющая три угла и три стороны» не расширяет ваши знания.Оно для вас неинформативно, хотя это же сообщение будет нести информацию для учеников 1 класса.;
-Знания человека можно разделить на две группы: декларативные («Я знаю, что...») и процедурные («Я знаю, как...»),или по- другому - факты и правила; -К фактам (у Вас описка в тексте вопроса) относятся знания об определённых явлениях (земля вращается вокруг своей оси), событиях (первый компьютер был создан в 1945г. в Америке), свойствах объектов (вес первой ЭВМ составлял 30 тонн), и зависимостях между объектами (у квадрата все углы прямые и все стороны равны). Описание фактов можно начать со слов: «Я знаю, что…»;
-К правилам относятся знания о последовательностях действий, направленных на достижение некоторой цели (выполнить фонетический разбор слова, вычислить периметр многоугольника, вылечиться от простуды…). Описание правил можно начать со слов: «Я знаю, как…»

не так уж и трудно, если

program project2;

var

n,a,b,c,i,k,max,min: longint;

inp,outp: text;

begin

assign(inp,'input.txt');

reset(inp);

assign(outp,'output.txt');

rewrite(outp);

readln(inp,n);

max: =0;

min: =0;

c: =0;

for i: =1 to n do

begin

read(f1,a);

if i=1 then

b: =a;

if a> max then

max: =a;

k: =a-c;

c: =a;

if k< 0 then

begin

k: =abs(k);

min: =min+k;

if k> min then

min: =k;

end;

end;

max: =max-b;

write(outp,max,' ',min);

close(inp);

close(outp);

end.