Ответы:
1 - Г
2 - В
3 - Д
4 - А
5 -Б
1) x:=1;
while x<10 do writeln(x);</p>
Значение x в цикле не изменяется, значит цикл будет выполняться бесконечно
2) x:=1;
while x=1 do
begin
writeln(x); x:=x+1;
end;
Цикл выполняется только при x=1, значение x в цикле изменяется (x:=x+1;), значит цикл будет выполнен 1 раз
3) x:=1;
while x<10</p>
begin
writeln(x); x:=x+1;
end;
Нет do, значит появится сообщение об ошибке
4) x:=1;
while x
begin
writeln(x); x:=x-1;
end;
Цикл выполняется при x<0, первоначальное значение x (x:=1;) больше, значит цикл не будет выполнен ни разу</p>
5) x:=1;
while x<=10 do</p>
begin
writeln(x); x:=x+1;
end;
Цикл выполняется при x<=10, первоначальное значение x (x:=1;) соответствует условию, значение x в цикле изменяется (x:=x+1;), значит цикл будет выполняться пока x соответствует условию, т.е. 10 раз</p>