Program keklol;
var y,x:integer;
writeln('vvedite y',y);
readln(y);
writeln('vvedite x',x);
readln(x);
y=1/(x*x*x)+(2sqr(x))+x
end.
{ пересечение окружностей }
var xa,ya,xb,yb,ra,rb: integer;
d: real;
st: string;
f: text;
begin
assign (f,'C:\In.txt');
reset (f);
read (f,xa,ya,ra);
read (f,xb,yb,rb);
close (f);
d:=Sqrt(sqr(xb-xa)+sqr(yb-ya));
if (d>rb+ra) or (d<abs(rb-ra)) then st:='NO'
else st:='YES';
{ запись в выходной файл }
assign (f,'C:\Out.txt');
rewrite (f);
writeln (f,st);
close (f);
end.
<span>
</span>
Ответ:
5
Объяснение:
По циклу будет три прохода (при очередном входе с=1 , 2, 3).
Перед входом в цпикл b = 2, а за каддый проход по циклу b увеличивается на a, т.е. на 1. Итого, b уведичится на 3 и станет равным 5.
После всех вычислении получается ответ 4