1. → 2 [сдвинуться вправо, перейти на строку 2]
2. → 3 [сдвинуться вправо, перейти на строку 3] — в вопросе опечатка?
3. → 4 [сдвинуться вправо, перейти на строку 4]
4. ? 5;2 [если в текущей ячейке нет метки, перейти на строку 5, иначе вернуться на 2]
5. ← 6 [сдвинуться влево, перейти на строку 6]
6. V 7 [поставить метку, перейти на строку 7]
7. ! [закончить работу]
Программа делает следующее: переходит на метку вправо, шагами по две ячейки идёт вправо, пока не дойдёт до пустой ячейки, возвращается на ячейку влево, ставит там метку и заканчивает работу.
Пусть метки расположены в ячейках 0 - (n-1), каретка под ячейкой 0.
Тогда сначала каретка окажется подячейкой 1, сделает [n/2] шагов по 2 вправо ([x] — целая часть x), оказавшись под ячейкой 1 + 2 * [n/2], вернётся на ячейку влево (ячейка 2 * [n/2]) и поставит там метку.
Если n было четным, будут заполнены ячейки от 0 до n, каретка под ячейкой n
Если n было нечетным, будут заполнены ячейки от 0 до n - 1, каретка под ячейкой n - 1
Vara,b,c:real;begin readln(a,b); if a>=b then begin b:=b*b*b; a:=sqrt(a); end else begin a:=a*a*a; b:=sqrt(b); end; writeln(a:0:0,' ',b:0:0); readlnend.
1)16умн90=1440(с)
2)32умн80=2560(с)
3(2560-1440=1120(с)
Ответ:на 1120 байт больше у 2 племени в письме
(Так думаю)
CLS
e = .0001
PRINT TAB(20); "labrab 2"
PRINT " x S yt p kol"
FOR x = .2 TO 1 STEP .1
n = 1: S = 0: kol = 0: sm = 1: np = 1
DO
np = np * x
V = sm * np / n
S = S + V
n = n + 1
kol = kol + 1
sm = -sm
LOOP UNTIL ABS(V) <= e
yt = LOG(1 + x)
P = ABS((S - yt) * (yt)) * 100
PRINT USING "#.# ##.#### ##.#### ##.#### ##"; x; S; yt; P; kol
NEXT x
END
<em><u>Результат выполнения программы:</u></em>
labrab 2
x S yt p kol
0.2 0.1823 0.1823 0.0002 5
0.3 0.2624 0.2624 0.0002 7
0.4 0.3365 0.3365 0.0007 8
0.5 0.4054 0.4055 0.0012 10
0.6 0.4700 0.4700 0.0009 14
0.7 0.5306 0.5306 0.0019 18
0.8 0.5878 0.5878 0.0023 27
0.9 0.6419 0.6419 0.0027 51
Иероглифы обозначали целые слова и слоги, их было более 750