1)
var
x,n,m,k : real;
begin
write('m = '); read(m);
write('k = '); read(k);
write('n = '); read(n);
x:= n * (sin(k) + cos(m-2));
writeln('x = ', x:0:3);
end.
2)
n,l,k : real;
write('l = '); read(l);
writeln((sqrt(n) + sqrt(k-1/l*n+sin(k*l))):0:4);
Поделитесь своими знаниями, ответьте на вопрос:
Решите, записав в Паскале: а)x=n(sin k+ cos (m-2)) б)√n+√k-1/|n+sin k|
1)
var
x,n,m,k : real;
begin
write('m = '); read(m);
write('k = '); read(k);
write('n = '); read(n);
x:= n * (sin(k) + cos(m-2));
writeln('x = ', x:0:3);
end.
2)
var
n,l,k : real;
begin
write('l = '); read(l);
write('k = '); read(k);
write('n = '); read(n);
writeln((sqrt(n) + sqrt(k-1/l*n+sin(k*l))):0:4);
end.