? 1. Айнымалы дегеніміз не? 2. Айнымалы аты қалай таңдалады? 3. Айнымалы қалай хабарланады? 4. Айнымалыларда қандай сипаттамалар болады? 5. Айнымалы типі дегеніміз не? 6. Қандай деректер типі құрамдас болып табылады? 7. Айнымалының типі қандай көрсеткіштері бойынша таңдалады? 8. Ең танымал айнымалылар типін атаңдар. 9. int не үшін қолданылады? Бүтін деректер типіне қандай қосымшалар қолданылады? 10. float, double, char, bool не үшін қолданылады?

//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