Код ко второй и восьмой задачам:
{2-nd task}
var t,p,x,a,y: real;
begin
write('t = ');
readln(t);
write('p = ');
readln(p);
write('x = ');
readln(x);
write('a = ');
readln(a);
y:= (exp(ln(t)*p))*(exp(ln(x)*5))*(1 - (x - (exp(ln(a)*x)))/((exp(ln(x)*2)) + 5.3));
writeln('y = ',y:0:2);
end.
{8-th task}
var x,a,y,b,r,q,d: real;
write('y = ');
readln(y);
write('b = ');
readln(b);
write('r = ');
readln(r);
write('q = ');
readln(q);
write('d = ');
readln(d);
x:= ((exp(ln(cos(y))*a)) - (exp(ln((sin(exp(ln(r)*8*q*b)))/((exp(ln(d)*(2*a*b))) + 18.31);
writeln('x = ',x:0:2);
#include <math.h>
#include <stdlib.h>
#include <conio.h>
int main() {
double a, b, y;
int x;
a = 6.72f;
b = 4.85f;
printf("vvedite x=");
scanf("%d", &x);
switch (x) {
case 1: y = 1 + sqrt(a + abs(x)); break;
case 7: y = 2 + a*a*x*x + exp(x); break;
case 5: y = x*sqrt(1+b*log(a*a*x)); break;
default:
printf("znachenie x zadano neverno\n");
printf("nagmi Enter\n");
getch();
return 0;
}
printf("x=%2dy=%5.2lf", x, y);
getch();
return 0;
}
Код ко второй и восьмой задачам:
{2-nd task}
var t,p,x,a,y: real;
begin
write('t = ');
readln(t);
write('p = ');
readln(p);
write('x = ');
readln(x);
write('a = ');
readln(a);
y:= (exp(ln(t)*p))*(exp(ln(x)*5))*(1 - (x - (exp(ln(a)*x)))/((exp(ln(x)*2)) + 5.3));
writeln('y = ',y:0:2);
end.
{8-th task}
var x,a,y,b,r,q,d: real;
begin
write('a = ');
readln(a);
write('y = ');
readln(y);
write('b = ');
readln(b);
write('r = ');
readln(r);
write('q = ');
readln(q);
write('d = ');
readln(d);
x:= ((exp(ln(cos(y))*a)) - (exp(ln((sin(exp(ln(r)*8*q*b)))/((exp(ln(d)*(2*a*b))) + 18.31);
writeln('x = ',x:0:2);
end.