Примеры актуальной и неактуальной информации

Актуальная информация - важна в настоящее время .пример-вечером ожидается гроза(прогноз погоды) или движение по таким-то улицам будет перекрыто,в связи с проведением демонстрации,заранее пользуйтесь маршрутами об"езда. неактуальная информация может быть  по-времени (устаревшая)-в 2010 году открыли новый участок трассы москва-дон или ненужной,неважной- курс швейцарского франка  стабилен или а индии восстановили движение поездов(если вы не воспользуетесь в индии в ближайшее время,то эта информация для вас не актуальна).

program xxx;

    var i, k : integer;

                  a : array [1..10] of real;

begin

  write('введите элементы массива а: ');

  for i: =1 to 10 do

        readln(a[i]);

  writeln('исходный массив а: ');

  for i: =1 to 10 do

        write(a[i]);

  k: =0;

  for i: =1 to 9 do

      if a[i]< > a[10] then k: =k+1;

  writeln('элементов отдичных от последнего -', k);

  readln

end.

var

  n: integer;

begin

  readln(n);

  writeln(abs(n)-2);

end.