Дан фрагмент программы на языке Паскаль. Укажите сколько раз выполнится цикл x:=1;
While x ∠ ( знак меньше ) 1 do
Begin
ReadIn(A);
S:=S+A;
x:=x+0.1;
End;

0

Объяснение:

Изначально х = 1

Пока верно условие х < 1 выполняется цикл. Если условие x < 1 не верно, то и цикл выполняться не будет, так как цикл while - цикл с предусловием (сначала проверяем верно ли условие, потом выполняем тело цикла, если условие верно)

Условие х < 1 (1 < 1) не верно, значит цикл выполнится 0 раз