Електронна «книжка», де містяться різна інформація. іншим комп'ютерам

Виды носителей информации: ленточные (магнитная лента), дисковые, накопители на гибких магнитных дисках (дискета), накопители на жестких магнитных дисках (винчестер), накопители на оптических дисках (компакт-диск, оптические диски, магнитнооптические компакт-диски), электронные носители (флэш-память).
Преобразование (обработка) информации - это процесс изменения формы представления информации или её содержания. 
Элементы окна paint: строка меню, набор инструментов, панель настройки, палитра, рабочая область, строка состояния.
Элементы окна word: строка заглавия, строка меню, панель инструментов, рабочая область, строка состояния. 

Храним в памяти 3 последних считанных числа. Для каждой такой тройки проверяем, верно ли, что a[i] - a[i - 1] = a[i - 1] - a[i - 2] > 0. Если это так, выводим тройку, устанавливаем флажок found и выходим из цикла. Если после завершения работы цикла found = false, то тройка не найдена, нужно вывести -1.

В PascalABC.NET тип integer хранит числа до 2 с лишним миллиардов, все числа и разность чисел должны в нем поместиться.

Код (PascalABC.NET 3.4.2.1837):

begin

 var values := new integer[3];

 var n := readinteger;

 (values[1], values[2]) := readinteger2;

 var prev_diff := values[1] - values[0];

 var found := false;

 for var i := 3 to n do begin

   values[i mod 3] := readinteger;

   var diff := values[i mod 3] - values[(i - 1) mod 3];

   if (diff = prev_diff) and (diff > 0) then begin

     print(values[(i - 2) mod 3], values[(i - 1) mod 3], values[i mod 3]);

     found := true;

     break;

   end;

   prev_diff := diff;

 end;

 if not found then print(-1);

end.