Red de conocimiento informático - Conocimiento informático - Se sabe que los tres vértices de la pirámide triangular son A, B y C, y las tres bases correspondientes son L1, L2 y L3. ¿Cómo encontrar la longitud de un lado?

Se sabe que los tres vértices de la pirámide triangular son A, B y C, y las tres bases correspondientes son L1, L2 y L3. ¿Cómo encontrar la longitud de un lado?

1. Ingrese dos números enteros y envíelos en orden descendente.

(1-1)

var a, b: entero;

Inicio

readln(a, b);

p>

Si a & gt=b entonces escribe (a, b) en caso contrario escribe (b, a)

Fin.

(1-2)

var a, b: entero;

Inicio

readln(a, b);

p>

Si a & gtb entonces escribe (a:5, b:5) en caso contrario escribe (b:5, a:5);

Si a=b, entonces escribir (' a = b ');

Fin.

2. Ingrese tres números enteros y extráigalos en orden descendente.

var a, b, c: entero;

max, min: entero;

Inicio

readln(a, b, c);

Si a & gtb entonces comienza max:= a; mínimo:=b final

si no comienza min:= a;

Si c & gtmax entonces comienza max:= c end;

Si c & ltmin entonces comienza min:= c end;

writeln(máximo: 5, a +b +c-valor máximo-valor mínimo: 5, valor mínimo: 5)

Fin.

3. Suma S = 1+2+3+4+...10.

var S, x: entero

Inicio

s:= 0;

Hacer para x:=1 a 10

s:= x+s;

Escribir contenido;

p>

Fin.

4. Encuentra el producto S = 1 * 2 * 3 * 4 *...10.

var s: real

x: entero; /p>

Inicio

s:= 1;

Hacer durante x:=1 a 10

s:= s * x;

p>

writeln(s:9:0);

end.v

5. Calcular S = 1-1/2+1/3. -1/4+ 1/5-1/6+1/7-1.

var i: entero;

s: verdadero;

Inicio

I:= s:= 0;

p>

Para i:=1 a 10 haz

if (i mod 2)>0 entonces s:=s+1/I

else s:= s- 1/I; (¡Qué bonito aquí!)

Escrito al final del Capítulo 9, Sección 4

6. Hay una secuencia de fracciones: 2/1, 3/2, 5/3, 8/5, 13/8, 21/13... Encuentra la suma de los primeros 20 elementos. en esta secuencia.

var i, t, fz, fm: entero;

s: verdadero

inicio

s:= 0; := 2; FM:= 1;

para i:=1 a 20 hacer

Inicio

s:= s+FZ/FM;

p>

t:= FZ+FM;

FM:= FZ;

FZ:= t;

Fin;

writeln(s:8:2);

Fin.

7. Introduce 10 números y encuentra el más grande.

var a:matriz:= 1; I:= 1; j:= 3

Repetir

k:= k+1; I-1; ty:= j+1;

Si tx =0, entonces tx:= 5;

Si ty=6, entonces ty:= 1;

Si a[tx,ty]<>0 entonces comienza tx:= I+1;ty:= j;end;

I:= tx;j:= ty;a[ i , j]:= k;

hasta k = 25

para i:=1 a 5

empezar

para j :=1 a 5 escribir(a[i,j]:3);

writeln

Fin;

Fin.

¿Cuál es el número con mayor divisor entre 35,1-10000? Por ejemplo, 6 tiene cuatro divisores: 1, 2, 3 y 6.

36. Encuentra la k-ésima raíz de n, con una precisión de R dígitos después del punto decimal.

37. Sistema negativo, cambia el número decimal positivo.

39. Seleccionar todos los casos de N permutaciones de M letras diferentes.

40. Coloca N reinas en el tablero de ajedrez N*N para que no se ataquen entre sí. Encuentre cuántas permutaciones diferentes hay, encuentre N y genere todas las permutaciones y el número total de permutaciones.

41. Hay una secuencia extraña en la que 1 es su elemento. En el futuro, cada elemento será 2 veces 1 o 3 veces 1 del elemento anterior, sin ningún otro elemento. Encuentra el elemento número 100 de esta secuencia.

42. Calcule 24 puntos, dados 4 números, obtenga 24 mediante la operación de +-*‷ y corchetes, encuentre dicha expresión.

43. Existe una fórmula 1 02 03 04 05 06 07 08 09 00 = 1 08, en la que +-*⊙ se puede completar o dejar en blanco, por lo que es mejor dejar 1 02 en blanco y convertirse en 10.

44. Dado un número entero positivo de no más de 40 dígitos, complete varios símbolos de multiplicación para formar una fórmula y pregunte cómo completar la fórmula para maximizar el resultado. Por ejemplo, N=123, K=1 y el logro máximo es 36.

45. Dada una ecuación química legal que no está balanceada, por favor equilibrarla.

46. Problema de sellos: Solo puede haber N sellos en un sobre, pero hay K tipos de sellos. ¿Cómo disponer los valores nominales de los sellos en K de modo que los más pequeños no puedan combinarse para colocar el valor nominal más grande?