Написать блок схему и программу которая запрашивает ввод 2-х чисел .к большему +1 , а из меньшего -1.

Var   i,j,k,ix,jx,kx: integer;   s: string; function per(x: integer): string; begin case x of   10: result: ='a';   11: result: ='b';   12: result: ='c';   13: result: ='d';   14: result: ='e';   15: result: ='f';   else     str(x,result);   end; end; begin for i: =1 to 15 do   for j: =0 to 15 do     for k: =0 to 15 do       if 2*(i*16*16+j*16+k)=j*16*16+k*16+i then           begin           ix: =i;           jx: =j;           kx: =k;           end; s: =per(ix)+per(jx)+per(kx); writeln(s);       end.  в результате работы программы получаем ответ.ответ: 6db

Const n = 12; const k = 0; var temp : array [1..n] of integer;       i, min, max, count : integer; begin       min : = 1000; max : = -1000;       count : = 0;       {заполнение массива данными}       for i : = 1 to n do       begin             write(i,'-й месяц: ');             readln(temp[i]);             if (temp[i] > max) then                   max : = temp[i];             if (temp[i] < min) then                   min : = temp[i];             {если температура выше k - месяц считается теплым}             if (temp[i] > k) then                   count : = count + 1;       end;       writeln('минимальная температура: ',min);       writeln('максимальная температура: ',max);       writeln('количество теплых месяцев: ',count);       readln; end.