Вы уже знаете, что обработка информации - решение некоторой
информационной задачи. А какие информационные задачи вам
приходилось решать? Напишите по 1 примеру. НАПРИМЕР: Я утром
интересуюсь погодными условиями, чтобы принять решение: как мне
одеться? *​

//Pascal ABC.NET 3.1 сборка 1219

Const
 n=5;

Var
 max1,max2,min1,min2,i:integer;
 ar:array[1..n] of integer;
begin
 max1:=integer.MinValue;
 max2:=integer.MinValue;
 min1:=integer.MaxValue;
 min2:=integer.MaxValue;
 for i:=1 to n do
  begin
   readln(ar[i]);
   if (ar[i]<max1) and (ar[i]>max2) then max2:=ar[i] else
   if ar[i]>max1 then
   begin
   max2:=max1;
   max1:=ar[i];
   end;
   if (ar[i]>min1) and (ar[i]<min2) then min2:=ar[i] else
   if ar[i]<min1 then
   begin
   max2:=max1;
   min1:=ar[i];
   end;
  end;
 writeln('Сумма максимумов:',max1+max2);
 writeln('Cумма минимумов:',min1+min2);
end.

Пример ввода:
1
2
3
4
5
Пример вывода:
Сумма максимумов:9
Cумма минимумов:3

Моя семья небольшая, но очень крепкая и дружная. В нашей семье все любят и уважают друг друга. Нас пять человек: мама, папа, бабушка, брат и я. У каждого из нас в семье особая роль. Вот, например, мама следит за порядком в доме: чтобы все были сыты, одеты по погоде, чтобы всё было на своих местах. Всем известно, что на земле нет ближе и роднее человека, чем мама. Мою маму зовут Светлана Александровна. Она – переводчик, а до этого работала в школе учителем английского языка. Моя мама добрая, умная и красивая! Она всегда придёт на подскажет, как правильно поступить поддержит, но может и поругать, если что натворю. Она очень меня любит, и я тоже её люблю. Теперь я хочу рассказать о своём папе. Папа у меня замечательный! Вся тяжёлая мужская работа дома и на даче – на нём. Папа, Алексей Николаевич, работает начальником производства в цифровой типографии. Он очень ответственный и исполнительный. Но, несмотря на то, что он сильно занят, папа всегда готов Папа – мой главный консультант по точным наукам. А ещё, папа – водитель. Мы любим ездить с папой на машине. Мой папа – самый лучший!