Некоторый алгоритм из одной цепочки символов получает новую цепочку следующим образом. сначала записывается исходная цепочка символов, после неё записывается исходная цепочка символов в обратном порядке, затем записывается буква, следующая в алфавите за той буквой, которая в исходной цепочке стояла на первом месте. получившаяся цепочка является результатом работы алгоритма. например, если исходная цепочка символов была лес, то результатом работы алгоритма будет цепочка лесселм. дана цепочка символов го. какая цепочка символов получится, если к данной цепочке применить алгоритм дважды (то есть к данной цепочке применить алгоритм, а затем к результату его работы применить алгоритм ещё раз)?

5 раз.

Объяснение:

В заголовке цикла указываются два значения. Первое значение присваивается так называемой переменной-счетчику, от этого значения начинается отсчет количества итераций (повторений). Отсчет идет всегда с шагом равным единице. Второе значение указывает, при каком значении счетчика цикл должен остановиться. Другими словами, количество итераций цикла определяется разностью между вторым и первым значением плюс единица.

program cycle;

var a,k:integer;

begin

 for k:= 1 to 5 do

   writeln(k);

end.

var x1,y1,x2,y2,x3,y3,x4,y4:integer;

N1,N2:real;

begin

writeln('Введите координаты первой точки - ');

readln(x1,y1);

writeln('Введите координаты второй точки - ');

readln(x2,y2);

writeln('Введите координаты третьей точки - ');

readln(x3,y3);

writeln('Введите координаты четвертой точки - ');

readln(x3,y3);

n1:= sqrt( (x3-x1) * (x3-x1) + (y3 - y1) * (y3-y1) );

n2:= sqrt( (x4-x2) * (x4-x2) + (y4 - y2) * (y4-y2) );

writeln('Длина первой диагонали - ',n1);

writeln('Длина второй диагонали - ',n2);

readln;

end.

Держи.