6. laborgyakorlat, házik megoldásai

Contents

clear all, close all

1. feladat

f=@(x)x.*sin(x)
x=0:pi/8:pi;
f(x)

f = 
    @(x)x.*sin(x)
ans =
  Columns 1 through 6
            0      0.15028      0.55536       1.0884       1.5708        1.814
  Columns 7 through 9
       1.6661        1.052  3.8473e-016

2. feladat

ezplot(f,[0,2])

3. feladat

V=@(r,m)r.^2.*m*pi
r=1:5
m=6:10
V(r,m)

V = 
    @(r,m)r.^2.*m*pi
r =
     1     2     3     4     5
m =
     6     7     8     9    10
ans =
        18.85       87.965       226.19       452.39        785.4

4. feladat

close
hold on
for k=1:10
p=@(x)x.^k;
x=0:0.01:1;
plot(x,p(x))
end
hold off

5. feladat

close
subplot(2,2,1)
ezplot('sin(x)')
subplot(2,2,2)
ezplot('cos(x)')
subplot(2,2,3)
ezplot('tan(x)')
subplot(2,2,4)
ezplot('1/tan(x)')

6. feladat

close
x=linspace(0,pi/4,12);
y=tan(x);
plot(x,y,'m:^')

7. feladat

close
v=100;
g=9.8;
theta=45;
sv=@(t)v*cosd(theta)*t
sf=@(t)v*sind(theta)*t-g*t.^2/2

figure(1)
ezplot(sv,[0,25])
title('vízszintes elmozdulás az idő függvényében')
xlabel('Idő')
ylabel('Pozíció')
figure(2)
ezplot(sf,[0,25])
title('vízszintes elmozdulás az idő függvényében')
xlabel('Idő')
ylabel('Pozíció')

sv = 
    @(t)v*cosd(theta)*t
sf = 
    @(t)v*sind(theta)*t-g*t.^2/2

8. feladat

close all
t=linspace(0,25,200);
plot(sv(t),sf(t))

9. feladat

close
v=100;
g=9.8;
t=linspace(0,25,200);
hold on
for theta=[60,45,30]
sv=@(t)v*cosd(theta)*t;
sf=@(t)v*sind(theta)*t-g*t.^2/2;
plot(sv(t),sf(t))
end
hold off

vagy

close all
v=100;
g=9.8;
t=linspace(0,25,200);
hold on
theta=60;
sv60=@(t)v*cosd(theta)*t;
sf60=@(t)v*sind(theta)*t-g*t.^2/2;
theta=45;
sv45=@(t)v*cosd(theta)*t;
sf45=@(t)v*sind(theta)*t-g*t.^2/2;
theta=30;
sv30=@(t)v*cosd(theta)*t;
sf30=@(t)v*sind(theta)*t-g*t.^2/2;
plot(sv60(t),sf60(t),'r-',sv45(t),sf45(t),'b-',sv30(t),sf30(t),'k-')
legend('60','45','30')
xlabel('vízszintes távolság')
ylabel('függőleges távolság')
hold off

10. feladat

comet(sv45(t),sf45(t))

Published with MATLAB® 7.6