Определите, чему будет равно значение переменной x после выполнения такой программы: x: = 1;while (x div 10 < 5) and (x < 49) do x := x + 1;

Ответ:

49

Объяснение:

program zad;

var x: integer;

begin

x:=1;

while (x div 10 < 5) and (x < 49) do x := x + 1;

writeln(x);

end.

Ответ:

думаю 49

Объяснение:

оператор div возвращает целое число без остатка

х=48 выполнится и х станет 49

и дальше цикл не пойдет