((b + sqrt(sqr(b)+4*a*c))/(2*a)) - power(a,3)+power(b, -2);
(a/c) * (b/d) - ((a*b-c)/(c*d));
((sin(x)+cos(y))/(cos(x)-sin(y)))*tan(x*y);
x - (power(x,3)/3)+(power(x,5)/5);
<em>// PascalABC.NET 3.2, сборка 1385 от 14.02.2017</em><em>// Внимание! Если программа не работает, обновите версию!</em>begin
var a,b,h:real;
Write('Введите a,b,h: '); Read(a,b,h);
var n:=Trunc((b-a)/h);
for var i:=0 to n do begin
var x:=a+i*h;
var y:=cos(x)*sqrt(x);
Writeln(x:6:3,y:15:5)
end
end.
<u>Пример</u>Введите a,b,h: 0.2 3.2 0.3
0.200 0.43830
0.500 0.62054
0.800 0.62315
1.100 0.47574
1.400 0.20111
1.700 -0.16799
2.000 -0.58852
2.300 -1.01046
2.600 -1.38169
2.900 -1.65348
3.200 -1.78580
1) 1 4 7
2) 1 число больше второго на 3
3) 1 число больше второго на 3 а второе число больше третьего на 2
4) ,5) 7 4 1 потому что надо делать всё на оборот пункту 2
6) Конец.Ты молодец !!!
И я молодец !!!