var x,q,v,z:real;
begin
writeln('введите q');
readln(q);
writeln('введите v');
readln(v);
x:=2;
while x<=10 do begin
z:=sin(x)+4*q*v*v*v;
writeln('z=',z,' при x=',x);
x:=x+0.77;
end;
end.
var x,q,v,z:real;
begin
writeln('введите q');
readln(q);
writeln('введите v');
readln(v);
x:=2;
while x<=10 do begin
z:=sin(x)+4*q*v*v*v;
writeln('z=',z,' при x=',x);
x:=x+0.77;
end;
end.