Last active
March 22, 2023 12:02
-
-
Save Shigetorum635/ccd44aa8401401324adcf3476be7a465 to your computer and use it in GitHub Desktop.
PSEINT shit idk
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Funcion resto(num) | |
Mientras i<=num Hacer | |
Si i MOD num==0 Entonces | |
Escribir i,' Es divisor' | |
FinSi | |
i <- i+1 | |
FinMientras | |
FinFuncion | |
Funcion primo(n) | |
divs <- 0 | |
i <- 1 | |
Mientras i<=n Hacer | |
Si n MOD i==0 Entonces | |
divs <- divs+1 | |
FinSi | |
i <- i+1 | |
FinMientras | |
Si divs==2 Entonces | |
Escribir n,' es primo' | |
SiNo | |
Escribir n,' no es primo' | |
FinSi | |
FinFuncion | |
Funcion multiplicar(n,veces,pass) | |
Para i<-0 Hasta veces Con Paso pass Hacer | |
multiplicado <- n*i | |
Escribir n,' x ',i,' = ',multiplicado | |
FinPara | |
FinFuncion | |
Funcion numerosPares(veces) | |
Definir i Como Real | |
Para i<-0 Hasta veces Con Paso 2 Hacer | |
Escribir i | |
FinPara | |
FinFuncion | |
// Factorial manual (Abstraccion 2) | |
Funcion factorial(n) | |
multiplicadoTotal <- 1 | |
Para i<-1 Hasta n Hacer | |
multiplicadoTotal <- multiplicadoTotal*i | |
Escribir multiplicadoTotal/i,' x ',i,' = ',multiplicadoTotal | |
FinPara | |
Escribir 'FACTORIAL = ',multiplicadoTotal | |
FinFuncion | |
// Potencia Simple (Abstraccion 1) | |
Funcion potencia_simple(n, veces) | |
escribir n, "^" veces " = " n^veces | |
FinFuncion | |
// Potencia manual | |
funcion potencia_compuesta(n, veces) | |
potencia = 1 | |
para i<-1 hasta veces con paso 1 Hacer | |
potencia = n*potencia | |
escribir n "^" i " = " potencia | |
FinPara | |
FinFuncion | |
// Multiplicacion manual | |
funcion multiplicar_compuesto(n1, n2) | |
total = 0 | |
para i<-1 hasta n2 con paso 1 Hacer | |
total = n1 + total | |
escribir total " = " n1 " + " total | |
FinPara | |
escribir n1 " x " n2 " = " total | |
FinFuncion | |
funcion ecuacionSegundoGrado(a, b, c) | |
// -b+/-sqrt(b2 - 4ac) / 2a | |
calculoInterior = (b^2)-4*a*c | |
si calculoInterior < 0 | |
escribir "ERR: Raiz negativa!" | |
SiNo | |
escribir b "^2 - 4*" a "*" c " = " calculoInterior | |
calculoRaiz = raiz(calculoInterior) | |
escribir "sqrt(" calculoInterior ") = " calculoRaiz | |
sol1 = ((-b + calculoRaiz) / (2*a)) | |
sol2 = ((-b - calculoRaiz) / (2*a)) | |
escribir "-" (-b) "+" calculoRaiz "/ 2*" a " = " sol1 | |
escribir "-" (-b) "-" calculoRaiz "/ 2*" a " = " sol2 | |
escribir "X1 = " sol1 " || X2 = " sol2 | |
FinSi | |
FinFuncion | |
Algoritmo TIC | |
ecuacionSegundoGrado(5, -15, -50) | |
FinAlgoritmo |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment