Заполните пустые клетки таблицы, чтобы результат выполнения фрагмента программы был одним и тем же

Команда For:

For x:=1 to 9 do Writeln(x)

Команда While:

x:=-5;

While x<9 do

begin

y:=abs(x);

Writeln(y);

x:=x+1

end;

Объяснение:

Цикл For:

For переменная-счетчик := начальное значение to конечное значение do

For x:=1 to 9 do

x - переменная-счетчик

1 - начальное (минимальное) значение переменной-счетчика

9 - конечное (максимальное) значение переменной-счетчика

начальное значение <= конечного значения  (если это не так, то тело цикла не выполнится ни разу)

В цикле переменная-счетчик автоматически увеличивается на 1 каждый раз при выполнении тела цикла, пока не достигнет конечного значения включительно.

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