1,34567Е+3=<span>1,34567*10^3=1345,67</span>
Var
x0,xn,c:real;
x,y,xmax,ymax:real;
begin
writeln('Xнач, Xкон:');
readln(x0,xn);
write('С = '); readln(c);
x:=x0;
xmax:=x; ymax:=x*x-100*x+10;
repeat
x:=x+c;
y:=x*x-100*x+10;
if y>ymax then begin xmax:=x; ymax:=y; end;
until x>=xn;
writeln('xmax = ',xmax,' ymax = ',ymax);
end.
Пример:
Xнач, Xкон:
-10 20
С = 1
xmax = -10 ymax = 1110
<span>a = (x ^ 2 - x * y)/(0.7 * sin (Log(abs(x))))</span>
<span>Две скобки не хватает.</span>
3 рубля, потому что он может назвать подмножества: "четные числа" и "нечетные числа"