Программа будет делать действие пока х не станет =5 или больше 5. выполнит она действие 4 раза. в итогде у=10
1) 8×70=560
2) 3500÷560=6,25
Ответ:6,25
Чесно говоря не уверен но от 10 до 25 мигабайт
//PascalABC.Net 3.2
begin //true - если принадлежит, false - если не принадлежит
var x:=readreal ('x =');
var y:=readreal ('y =');
write ((sqrt(y*y+x*x)<=1) and (y>=0) and (y>=-x));
end.