Если всё так как написанно, то программа вообще не скомпилируется. Должно быть
a:=1;b:=1;
while a<2 do
begin
b:=b+2;
end;
s:=a+b;
в теле цикла переменная а не изменяется, поэтому цикл будет бесконечным. То есть пока Ctrl-Break не нажмешь будет кажаться что программа зависла.
Насколько он сместился за эти три команды "Сместиться на (-5, -1) Сместиться на (3, 2) Сместиться на (3, -1)"? на (-5 +3 +3,-1 +2 -1) = (1,0).
Теперь умножаем полученные координаты на количество повторений: (3,0).
Ещё перед этим он сместился на (-4, -1), значит суммарно он сместился на (3 -4, 0 -1) = (-1, -1). И чтобы вернуться обратно, нужно сместиться на это же значение, но в противоположную сторону, то есть, на (1,1)
Рабочий код во вложениях. Удачи.
P.s. Комментарии 1) // первая цифра числа //
2) // вторая цифра числа //
3) // третья цифра числа //
I = 64*64*16*256 - в битах
I = (64*64*16*256)/8 - в байтах
I = (64*64*16*256)/(8*1024) - в Кбайтах
I = (64*64*16*256)/(8*1024*1024) = 2 - в Мбайтах.
Основные информационные процессы. А теперь зададимся вопросом: что делает человек с полученной информацией? Во-первых, он ее стремится сохранить: запомнить или записать. Во-вторых, он передает ее другим людям. В третьих, человек сам создает новые знания, новую информацию, выполняя обработку данной ему информации. Какой бы информационной деятельностью люди не занимались, вся она сводится к осуществлению трех процессов: хранению, передаче и обработке информации
Подробнее - на Znanija.com - znanija.com/task/27337173#readmore
