PROGRAMAS PARA LA CALCULADORA GRÁFICA - PARTE II

Modelos Casio: C/FX-9xx0

Modelos Texas Instruments: TI-82/83/84

DIBUJA EN UN PLANO (COORDENADAS CARTESIANAS)
Mueve el puntero y observa las coordenadas
. . . CLRHOME:CLRDRAW:FNOFF: PLOTSOFF:DEGREE:COORDON:GRIDON:
AXESON:LABELSON:RECTGC:ZDECIMAL:
INPUT
Representa puntos
CLS:COORDON:GRIDOFF:AXESON:LABELON:SQUARE:
S-WINDAUTO
LBL1
"COORDENADA EN X"?→X
"COORDENADA EN Y"?→Y
PLOT X,Y
PLOT X,YΔ
GOTO 1
. . .
Traza líneas y dibuja figuras geométricas
CLS:COORDON:GRIDOFF:AXESON:LABELON:
S-WINDAUTO
LBL1
"COORDENADA INICIO LINEA EN X"?→V
"COORDENADA INICIO LINEA EN Y"?→W
"COORDENADA FIN LINEA EN X"?→X
"COORDENADA FIN LINEA EN Y"?→Y
F-LINE V,W,X,YΔ
GOTO 1
. . .
Dibuja punto a punto
. . . Presiona |2nd|draw|pen|
Presiona |enter| una vez para marcar puntos
Presiona |enter| otra vez para desplazarte
TRAZA ÁNGULOS
CLS:DEG:COORDON:GRIDOFF:AXESON:LABELON:
VIEWWINDOW -10,10,1,-10,10,1
LBL 1
10→R
"ANGULO EN GRADOS"?→A
RxCOS(A)→X
RxSIN(A)→Y
F-LINE 0,0,X,YΔ
GOTO 1
CLRHOME:PLOTSOFF:DEGREE:COORDON:GRIDOFF:
:FNOFF:AXESON:LABELSON:RECTGC:ZSTANDARD
10→R
LBL 1
INPUT "ANGULO EN GRADOS? ",A
R*COS(A)→X
R*SIN(A)→Y
LINE (0,0,X,Y)
DISPGRAPH
PAUSE
GOTO 1
...
. . . . . .
...
. . . . . .
PROBABILIDAD Y ESTADÍSTICA
Lanza un dado al aire
. . . CLRHOME
INPUT "NUMERO DE INTENTOS",A
FOR(Z,1,A,1)
RANDINT(1,6)→B
B→L1(Z)
END
DISPLAY L1
STOP
Lanza una moneda al aire
. . . CLRHOME
INPUT "NUMERO DE INTENTOS",A
FOR(Z,1,A,1)
RANDINT(0,1)→B
B→L1(Z)
END
DISPLAY L1
STOP
Extrae bolas (sin reponerlas)
CLRTEXT
"LAS EXTRACCIONES SE MUESTRAN EN LIST 2, IGNORA CERO"
"NUMERO DE BOLAS"?→A
FILE1
CLRLIST
1→N
A→DIM LIST 1
1→DIM LIST 2
SEQ([X0T],[X0T],1,A,1)
LIST ANS→LIST 1
LBL1
INT (AxRAN#+1)→B
IF LIST1[B]=0
THEN GOTO 1
ELSE Seq(B(X=N)+(X≠N)List 2[X - (X > N, X, 1, Dim List 2 + 1, 1→List 2
0→LIST 1[B]
1+N→N
LIST 2Δ
GOTO 1
IFEND
. . .
¿Está el dado trucado? Cambia la probabilidad y observa.
. . . CLRHOME
CLRALLLISTS
INPUT "PROBALIDAD DEL SUCESO EN %? ",A
0→N
1→DIM LIST 1
LBL 1
IF A>1:(A/100)→A
RANDBIN(6,A)→B
B→L1(N+1)
1+N→N
DISPLAY L1
PAUSE
GOTO1
¿Está la moneda trucada? Cambia la probabilidad y observa.
. . . CLRHOME
CLRALLLISTS
INPUT "PROBALIDAD DEL SUCESO EN %? ",A
0→N
1→DIM LIST 1
LBL 1
IF A>1:(A/100)→A
RANDBIN(1,A)→B
B→L1(N+1)
1+N→N
DISPLAY L1
PAUSE
GOTO1
GRÁFICOS BÁSICOS
Gráfico de barras
CLRGRAPH
"DATOS EN LIST 1, FRECUENCIAS EN LIST 2"
COORDOFF:GRIDOFF:AXESON:LABELOFF
S-WINDAUTO
S-GRPH1 DRAWON,HIST,LIST1,LIST2
DRAWSTAT
CLRDRAW
"DATOS EN L1, FRECUENCIAS EN L2"
COORDOFF:GRIDOFF:AXESON:LABELOFF
ZOOMFIT:FNOFF:PLOTSON
PLOT1(HISTOGRAM,L1,L2)
DISPGRAPH
Gráfico de líneas
CLRGRAPH
"DATOS EN LIST 1, FRECUENCIAS EN LIST 2"
COORDOFF:GRIDOFF:AXESON:LABELOFF
S-WINDAUTO
S-GRPH1 DRAWON,XYLINE,LIST1,LIST2
DRAWSTAT
CLRDRAW
"DATOS EN L1, FRECUENCIAS EN L2"
COORDOFF:GRIDOFF:AXESON:LABELOFF
:ZOOMFIT:FNOFF:PLOTSON
PLOT1(XYLINE,L1,L2,+)
DISPGRAPH

Creative Commons License
Esta obra está bajo una licencia de Creative Commons.


|Volver a la página de calculadoras|