Витя работает недалеко от одной из станций кольцевой линии московского метро, а живет рядом с другой станцией той же линии. требуется выяснить, мимо какого наименьшего количества промежуточных станций необходимо проехать вите по кольцу, чтобы добраться с работы домой. формат входных данных станции пронумерованы подряд натуральными числами 1, 2, 3, …, n (1-я станция – соседняя с n-й), n не превосходит 100. вводятся три числа: сначала n – общее количество станций кольцевой линии, а затем i и j – номера станции, на которой витя садится, и станции, на которой он должен выйти. числа i и j не . все числа разделены пробелом. формат выходных данных требуется выдать минимальное количество промежуточных станций (не считая станции посадки и высадки), которые необходимо проехать вите. примеры входные данные выходные данные комментарий 100 5 6 0 на кольцевой линии 100 станций; проехать с 5-й на 6-ю станцию витя может напрямую, без промежуточных станций 10 1 9 1 на кольцевой линии 10 станций; проехать с 1-й на 9-ю станцию витя может через одну промежуточную, ее номер 10

Var  n,i,j,x,y1,y2: integer; begin readln(n,i,j); x: =i; y1: =-1; y2: =-1; //y1 - движение в прямом направлении repeat   x: =x+1;   if x> n then x: =1;   y1: =y1+1;   until x=j; //y2 - движение в обратном направлении x: =i; repeat   x: =x-1;   if x< 1 then x: =n;   y2: =y2+1;   until x=j;   if y2< y1 then writeln(y2) else writeln(y1); end.

ну, без понятия на каком языке писать - не решаема.

однако, на "метаязыке":

 

задать массив матрица[5,5];

получить ввод в ввод;

если ввод = 's', то {

сумма = 0;

x = 1;

продолжать, пока x < = 5  {

сумма =  сумма +  матрица[x,x];

x = x + 1;

}

вывести  сумма;

} иначе, если  ввод равен 'a' или 'b' или 'c', то {

x = 1;

продолжать, пока x < = 5  {

среднарифм = 0;

y = 1;

продолжать, пока y < = 5  {

среднарифм  =  среднарифм  +  матрица[x,y];

y  = y + 1;

}

вывести  среднарифм / 5;

x = x + 1;

}

}  иначе, если  ввод = 'm', то {

минимум =  матрица[1,1];

максимум =  матрица[1,1];

x = 1;

продолжать, пока x < = 5  {

y = 1;

продолжать, пока y < = 5  {

если  матрица[x,y]  <   минимум   то  минимум =  матрица[x,y];

если  матрица[x,y]  >   максимум    то  максимум =  матрица[x,y];

y  = y + 1;

}

}

вывести  минимум;

вывести  максимум;

}

хотелось бы напомнить, что с=12, f=15, а=10.

имеем:

20с7f_16 = 2·16⁴ + 0·16³ + 12·16² + 7·16¹ + 15·16⁰ = 2·65536 + 12·256 + 7·16 + 15 = 131072 + 3072 + 112 + 15 = 134271_10(f3ao6/4)_16 = (15·16⁴ + 3·16³ + 10·16² + 0·16¹ + 6·16⁰)/4 = (15·65536 + 3·4096 + 10·256 + 6)/4 = (983040 + 12288 + 2560 + 6)/4 = 997894/4 = 249473,5 _10