Чему будет равно значение переменной х после выполнения следующих команд х:=7; while x=0 do x:=x*2

x = 7

Объяснение:

ответ:4

Объяснение:равно 4

сидерический год.

пусть введенный интервал будет

b и c,где b< c

var a,b,c,i: longint;

begin

    read(b,c);

    for i: =b to c do

            if i mod a=0 then write(i);

end.