NOWE POSTY | NOWE TEMATY | POPULARNE | STAT | RSS | KONTAKT | REJESTRACJA | Login: Hasło: rss dla

HOME » NAUKA » INFORMA

Przejdz do dołu stronyStrona: 1 / 4>>>    strony: [1]234

informa

  
kinimod
08.05.2008 11:35:15
poziom 4



Grupa: Administrator 

Lokalizacja: Gotenhafen

Posty: 223 #111761
Od: 2007-10-18


Ilość edycji wpisu: 1		clc
clear all
disp ('wykreslanie wielokatow')
zakres=input('Podaj zakres osi [xmin xmax ymin ymax]=');
Lb=input('Liczba bokow=');
disp ('wierzcholki zaznacz myszka');
close (gcf)
axis (zakres);
hold on
grid
pkt= ginput(Lb);
xp= pkt(:,1);
yp= pkt (:,2);
fill (xp,yp,[1 1 0]);
Pole=polyarea(xp,yp);
  
kinimod
08.05.2008 11:42:16
poziom 4



Grupa: Administrator 

Lokalizacja: Gotenhafen

Posty: 223 #111763
Od: 2007-10-18


Ilość edycji wpisu: 2		clc
clear all
disp ('wykreslanie wielokatow')
zakres=input('Podaj zakres osi [xmin xmax ymin ymax]=');
Lb=input('Liczba bokow=');
disp ('wierzcholki zaznacz myszka');
close (gcf)
axis (zakres);
hold on
grid
pkt= ginput(Lb);
xp= pkt(:,1);
yp= pkt (:,2);
c=uisetcolor([1 1 0], 'wybierz myszka kolor');
fill (xp,yp,c);
Pole=polyarea(xp,yp);
text(zakres(1)+1, zakres(4)-1, strcat('Pole=', sprintf('%7.2f', Pole)));
  
kinimod
08.05.2008 12:00:56
poziom 4



Grupa: Administrator 

Lokalizacja: Gotenhafen

Posty: 223 #111771
Od: 2007-10-18
clc
clear all
disp ('wykreslanie wielokatow')
zakres=input('Podaj zakres osi [xmin xmax ymin ymax]=');
Lb=input('Liczba bokow=');
disp ('wierzcholki zaznacz myszka');
close (gcf)
axis (zakres);
hold on
grid
pkt= ginput(Lb);
xp= pkt(:,1);
yp= pkt (:,2);
c=uisetcolor([1 1 0], 'wybierz myszka kolor');
fill (xp,yp,c);
Pole=polyarea(xp,yp);
text(zakres(1)+1, zakres(4)-1, strcat('Pole=', sprintf('%7.2f', Pole)));
xpr= [xp xp(1)];
ypr= [yp yp(1)];
dx= diff(xpr);
dy= diff(ypr);
dl= ((dx).^2+(dy).^2).^(0.5)
Obwod= sum(dl)
text(zakres(1)+1, zakres(4)-3, strcat('Obwod=', sprintf('%7.2f', Pole)))



nie dziala obwod
  
kinimod
08.05.2008 12:06:00
poziom 4



Grupa: Administrator 

Lokalizacja: Gotenhafen

Posty: 223 #111774
Od: 2007-10-18
clc
clear all
disp('wykreslanie wielokatow');
zakres=input('podaj zakres osi[xmin xmax ymin ymax]');
Lb=input('liczba bokow');
disp('wierzchlki zaznacz myszka');
close(gcf)
axis(zakres);
hold on
grid
pkt=ginput(Lb);
xp=pkt(:,1)';
yp=pkt(:,2)';
C=uisetcolor([1 1 0],'wybierz myszka kolor')
fill(xp,yp,C);
Pole=polyarea(xp,yp);
text(zakres(1)+1,zakres(4)-1, strcat('Pole=',sprintf('%7.2f',Pole)))
xpr=[xp,xp(1)];
ypr=[yp,yp(1)];
dx=diff(xpr);
dy=diff(ypr);
dl=(dx.^2+dy.^2).^0.5
obw=sum(dl)
text(zakres(1)+1, zakres(4)-3, strcat('obw=', sprintf('%7.2f',obw)));

pozdro dla przemka bardzo szczęśliwy
  
wojasz
08.05.2008 12:08:24
poziom 5



Grupa: Użytkownik

Lokalizacja: ...---===GDYNIA===---...

Posty: 462 #111779
Od: 2007-10-21
yeah bardzo szczęśliwy
  
anulka
08.05.2008 12:10:53
poziom 4

Grupa: Użytkownik

Lokalizacja: Klooklyn :)

Posty: 317 #111782
Od: 2007-10-18
informatyka stała się przyjemniejszawesoły
  
szczurek
08.05.2008 12:33:48
poziom 5



Grupa: Użytkownik

Lokalizacja: Frog District :)

Posty: 426 #111796
Od: 2007-10-18
disp('interpolacja wielomianu');
zakres=input('podaj wektor [xmin xmax ymin ymax]=');
lp=input('podaj liczbe punktow lp=');
x=[zakres(1)smutnyzakres(2)-zakres(1))/1000:zakres(2)];
axis(zakres);
hold on
grid
pkt=ginput(lp);
xp=pkt(:,1);
yp=pkt(:,2);
w=polyfit(xp',yp',lp-1);
y=polyval(w,x);
plot(x,y)
grid
hold off
title(strcat('wykres wielomianu:',sprintf('%7.3f',w)));
_________________
  
sunshine
08.05.2008 12:35:56
poziom 4



Grupa: Użytkownik

Lokalizacja: Tczew

Posty: 293 #111797
Od: 2007-10-19
disp('iterpolacja wielomianami')
zakres=input('podaj wektor[xmin xmax ymin ymax]=');
lp=input('podaj liczbe punktow lp=');
x=[zakres(1)smutnyzakres(2)-zakres(1))/1000:zakres(2)];
close(gcf);
axis(zakres);
hold on
grid
pkt=ginput(lp);
xp=pkt(:,1);
yp=pkt(:,2);
w=polyfit(xp',yp',lp-1);
y=polyval(w,x);
plot(x,y)
title (strcat('wykres wielomianu', sprintf('%7.3f',w)));
  
sunshine
08.05.2008 12:37:26
poziom 4



Grupa: Użytkownik

Lokalizacja: Tczew

Posty: 293 #111798
Od: 2007-10-19
disp('iterpolacja wielomianami')
zakres=input('podaj wektor[xmin xmax ymin ymax]=');
lp=input('podaj liczbe punktow lp=');
x=[zakres(1)smutnyzakres(2)-zakres(1))/1000:zakres(2)];
close(gcf);
axis(zakres);
hold on
grid
pkt=ginput(lp);
xp=pkt(:,1);
yp=pkt(:,2);
w=polyfit(xp',yp',lp-1);
y=polyval(w,x);
plot(x,y)
title (strcat('wykres wielomianu', sprintf('%7.3f',w)));
  
wojasz
08.05.2008 12:40:12
poziom 5



Grupa: Użytkownik

Lokalizacja: ...---===GDYNIA===---...

Posty: 462 #111799
Od: 2007-10-21
clc
clear all
close(gcf)
disp('interpolacja wielomianu');
zakres=input('Podaj wektor [xmin xmax ymin ymax]=')
lp=input('Podaj liczbe punktow lp=')
x=[zakres(1)smutnyzakres(2)-zakres(1))/1000:zakres(2)];
axis(zakres);
hold on
grid
pkt=ginput(lp);
xp=pkt(:,1);
yp=pkt(:,2);
w=polyfit(xp',yp',lp-1);
y=polyval(w,x);
plot(x,y)
hold off
title(strcat('Wykres wielomianu:',sprintf('%7.3f',w)));
  
kinimod
08.05.2008 12:54:11
poziom 4



Grupa: Administrator 

Lokalizacja: Gotenhafen

Posty: 223 #111801
Od: 2007-10-18
clc;
clear all;
pkt=0;
disp('Test z tabliczki mnozenia');
Lt=input('Podaj liczbe testow (miniumum 10)=');
while Lt<10
Lt=input('Minimum 10 testow=');
end
rand('state', sum(100*clock));
for t=1:Lt
a= round(10*rand);
b= round(10*rand);
odp=input(strcat(num2str(a),'*',num2str(b),'='));
mn=size(odp);
if mn== [1 1]
if odp==a*b
pkt=pkt+2;
disp(strcat('Dobrze-masz:', num2str(pkt),'pkt));
else
pkt=pkt-1;
disp(strcat('zle' masz:', num2str(pkt),'pkt.'));
end
else
disp('otrzymujesz 0 pkt.');
end;'
end;'

tylko gdzies są byki jęzor
  
szczurek
08.05.2008 12:55:13
poziom 5



Grupa: Użytkownik

Lokalizacja: Frog District :)

Posty: 426 #111802
Od: 2007-10-18
disp('test z tabliczki mnozenia');
Lt=input('podaj liczbetestow(minimum 10)=')
while Lt<10
Lt=input('minimum 10 testow=')
end
rand('state',sum(100*clock));
for t=1:Lt
a=round(10*rand);
b=round(10*rand);
odp=input(strcat(num2str(a),'*',num2str(b),'='));
mn=size(odp);
if mn==[1 1]
if odp==a*b
pkt=pkt+2;
disp(strcat('Dobrze -masz:',num2str(pkt),'pkt'))
else
pkt=pkt-1;
disp(strcat('zle -masz:',num2str(pkt),'pkt.'))
end
else
disp('otrzymujesz 0 pkt.');
end
end
_________________
  
anulka
08.05.2008 12:57:49
poziom 4

Grupa: Użytkownik

Lokalizacja: Klooklyn :)

Posty: 317 #111804
Od: 2007-10-18
clc
clear all
pkt=0;
disp('Tesr z tabliczki mnozenia');
Lt=input('Podaj liczbe testow(minimum 10)=');
while Lt<10
Lt=input('Minimum 10 testow=');
end
rand('state',sum(100*clock));
for t=1:Lt
a=round(10*rand);
b=round(10*rand);
odp=input(strcat(num2str(a),'*',num2str(b),'='));
mn=size(odp);
if mn==[1 1 ]
if odp==a*b
pkt=pkt+2;
disp(strcat('Dobrze-masz:',num2str(pkt),'pkt'));
else
pkt=pkt-1;
disp(strcat('zle masz:',num2str(pkt),'pkt'));
end
else
disp('otrzymujesz 0 pkt.');
end;
end;
  
kubak
08.05.2008 13:07:10
poziom 4



Grupa: Użytkownik

Lokalizacja: dzieki Bogu nie Jankowo

Posty: 302 #111806
Od: 2008-2-5
clc;
clear all;
pkt=0;
disp('Test z tabliczki mnozenia');
Lt=input('Podaj liczbe testow (minimum 10)= ');
while Lt<10
Lt=input('Minimum 10 testow= ');
end
rand('state',sum(100*clock));
for t=1:Lt
a=round(10*rand);
b=round(10*rand);
odp=input(strcat(num2str(a),'*',num2str(b),'='));
mn=size(odp);
if mn==[1 1]
if odp==a*b
pkt=pkt+2;
disp(strcat('Dobrze -masz: ',num2str(pkt),'pkt.'));
else
pkt=pkt-1;
disp(strcat('Zle - masz: ',num2str(pkt),'pkt.'));
end
else
disp('otrzymujesz 0 pkt.');
end;
end;
disp(strcat('Uzyskano: ',num2str(pkt),' pkt. na',num2str(2*Lt),' mozliwych'));
ocena=4*pkt/Lt/2+1;
if ocena<1
ocena=1;
end
if ocena>=3
disp('Test zaliczony');
else
disp('Test niezaliczony');
end
disp(strcat('Ocena koncowa: ',sprintf('%4.1f',ocena)));
  
kinimod
08.05.2008 13:08:41
poziom 4



Grupa: Administrator 

Lokalizacja: Gotenhafen

Posty: 223 #111808
Od: 2007-10-18
clc
clear all
pkt=0;
disp('Test z tabliczki mnozenia');
Lt=input('Podaj liczbe testow(minimum 10)=');
while Lt<10
Lt=input('Minimum 10 testow=');
end
rand('state',sum(100*clock));
for t=1:Lt
a=round(10*rand);
b=round(10*rand);
odp=input(strcat(num2str(a),'*',num2str(b),'='));
mn=size(odp);
if mn==[1 1 ]
if odp==a*b
pkt=pkt+2;
disp(strcat('Dobrze-masz:',num2str(pkt),'pkt'));
else
pkt=pkt-1;
disp(strcat('zle masz:',num2str(pkt),'pkt'));
end
else
disp('otrzymujesz 0 pkt.');
end;
end;
disp(strcat('Uzyskano: ',num2str(pkt),' pkt. na', num2str(2*Lt), ' mozliwych'));
ocena=4*pkt/Lt/2+1;
if ocena<1
ocena=1;
end
if ocena>=3
disp('test zaliczony');
else
disp('Test niezaliczony');
end
disp(strcat('ocena koncowa:', sprintf('%4.1f', ocena)));
  
kinimod
08.05.2008 13:19:20
poziom 4



Grupa: Administrator 

Lokalizacja: Gotenhafen

Posty: 223 #111811
Od: 2007-10-18
clc
clear all
disp('Program TOTO');
p=6; n=6;
disp('podaj 6 liczb z zakreesu 1-49');
B=zeros(1,n);
for j=1:n
por=0;
while B(j)<1 | B(j)>49 | por==1
liw=input(strcat(num2str(j),' liczba: '));1
if size(liw)==[1 1]
B(j)=liw;
end
por=0;
for k=1:j-1
if (B(k)==B(j)) | (liw<1) | (liw>49)
por=1;
end;
end;
end;
end;
B=sort(B);
disp(strcat('podales liczby:',num2str(B)));
  
anulka
08.05.2008 13:20:29
poziom 4

Grupa: Użytkownik

Lokalizacja: Klooklyn :)

Posty: 317 #111812
Od: 2007-10-18


Ilość edycji wpisu: 1		clc
clear all
disp('program TOTO');
n=6;
disp('podaj 6 liczb z zakresu 1-49');
B=zeros(1,n);
for j=1:n
por=0;
while B(j)<1 | B(j)>49 | por==1
liw=input(strcat(num2str(j),' liczba: '));
if size(liw)==[1 1]
B(j)=liw;
end
por=0;
for k=1:j-1
if (B(k)==B(j)) | (liw<1) | (liw>49)
por=1;
end;
end;
end;
end;
B=sort(B);
disp(strcat('podales liczby:',num2str(B)));
  
kinimod
08.05.2008 13:22:09
poziom 4



Grupa: Administrator 

Lokalizacja: Gotenhafen

Posty: 223 #111815
Od: 2007-10-18


Ilość edycji wpisu: 1		smierdzisz. moje jest mojsze~~!! jęzor
  
szczurek
08.05.2008 13:23:14
poziom 5



Grupa: Użytkownik

Lokalizacja: Frog District :)

Posty: 426 #111817
Od: 2007-10-18
clc
clear all
disp('program toto');
n=6
disp('podaj 6 liczb');
b=zeros(1,n);
for j=1:n
por=0;
while [b(j)<1 | b(j)>49 | por==1]
liw=input(strcat (num2str(j),'liczba:'));
if size(liw)==[1 1]
b(j)=liw;
end
por=0;
for k=1:j-1
if (b(k)==b(j)) | (liw<1) | (liw>49)
por=1;
end;
end;
end;
end;
b=sort(b);
disp(strcat('podales liczby:',num2str(b)));
_________________
  
kinimod
08.05.2008 13:34:58
poziom 4



Grupa: Administrator 

Lokalizacja: Gotenhafen

Posty: 223 #111822
Od: 2007-10-18
clc
clear all
disp('Program TOTO');
n=6;
disp('podaj 6 liczb z zakreesu 1-49');
B=zeros(1,n);
for j=1:n
por=0;
while B(j)<1 | B(j)>49 | por==1
liw=input(strcat(num2str(j),' liczba: '));
if size(liw)==[1 1]
B(j)=liw;
end
por=0;
for k=1:j-1
if (B(k)==B(j)) | (liw<1) | (liw>49)
por=1;
end;
end;
end;
end;
B=sort(B);
disp(strcat('podales liczby:',num2str(B)));
rand('state', sum(100*clock));
matr=zeros(1,7);
m=input('Na ile losowan: ');
n=6;
for i=1:m
for j=1:n
A(j)=round(rand*48+1);
por=1;
while por==1
por=0;
for k=1:j-1
if A(k)==A(j)
por=1;
end;
end;
if por==1 A(j)=round(rand*48+1);
end;
end;
end;
tra=0;
for o=1:6
for p=1:6
if A(o)==B(p)
tra=tra+1;
end;
end;
end;
matr(tra+1)=matr(tra+1)+1;
end;
disp('liczba trafien')
for i=0:n
disp(strcat(num2str(i),'-',num2str(matr(i+1))));
end;

Przejdz do góry stronyStrona: 1 / 4>>>    strony: [1]234

  << Pierwsza      < Poprzednia      Następna >     Ostatnia >>  

HOME » NAUKA » INFORMA

Aby pisac na forum musisz sie zalogować !!!


TestHub.pl - opinie, testy, oceny