1)сложение А и В
2) отрицание А, умноженного на В
3) умножение оотрицательных А и В
5) отрицание А, сложенного с В
<span>а) (-b-sqrt(sgr(b)-4*a*c))/(2*a) = (-b- √(b^2 - 4ac))/(2a)
b) 75*sqrt(sgr(b)+2*a)/(sin(0.6)-a) = 75√(b^2 + 2a)/(sin (0,6) - a)
c) sin(a – exp(3*ln(b)))/(sqr(a)+cos(b))</span> = sin(a - e^(3ln b)) / (a^2 + cos b)
function summa(var x: mas; su: real): real;
var
i: integer;
begin
su := 0;
for i := 1 to n do
su := su + x[i];
summa:=su;
writeln('sum=', su);
end;
Цикл. приверы в паскале for ( для от одного значения до другого ) while ( пока) и другие...
Program tablisa_umnogenya;
var i,x,a: integer;
begin
read(x);
a:=0;
for i:=1 to 10 do
begin
a:=a+x;
writeln(a);
end;<span>
end.
эта программа на Паскаль, на оценку среднюю, тк считаю что на оценку повыше, недостаточно понятное оформление, если на оценку повыше, то заменить строку "</span>writeln(a); " на "writeln(x,'*',i,'=',a);"