Gente, Ayuda para Convertir Codigo

Iniciado por kevinxp06, 23 Abril 2011, 22:06 PM

0 Miembros y 1 Visitante están viendo este tema.

kevinxp06

Chicos, aunque casi siempre navego en la pagina, y es la precursora de mis ganas de aprender a programar, me veo imposibilitado de covertir un simple codigo.
Necesito convertir un este codigo a PSEINT, o en su defecto, al menos realizar uno parecido.
Puedo hacer el codigo en Java, en C+ y este... pero no puedo realizar la formula en PSEint, me siento totalmente vulnerable. Si alguien me da una mano, desde ya agradecido.

Este es el codigo:

Código (java) [Seleccionar]
function MakeArray(n) {

  this.length = n;

  for (var i = 1; i <=n; i++) {

    this[i] = 0;
  }
}

days = new MakeArray(7);

days[0] = "Sábado"
days[1] = "Domingo"
days[2] = "Lunes"
days[3] = "Martes"
days[4] = "Miércoles"
days[5] = "Jueves"
days[6] = "Viernes"

months = new MakeArray(12);

months[1] = "Enero"
months[2] = "Febrero"
months[3] = "Marzo"
months[4] = "Abril"
months[5] = "Mayo"
months[6] = "Junio"
months[7] = "Julio"
months[8] = "Agosto"
months[9] = "Septiembre"
months[10] = "Octubre"
months[11] = "Noviembre"
months[12] = "Diciembre"

function compute(form) {
  var val1 = parseInt(form.day.value, 10)

  if ((val1 < 0) || (val1 > 31)) {
     alert("Day is out of range")
  }

  var val2 = parseInt(form.month.value, 10)

  if ((val2 < 0) || (val2 > 12)) {
     alert("Month is out of range")
   }

  var val2x = parseInt(form.month.value, 10)

  var val3 = parseInt(form.year.value, 10)

  if (val3 < 1900) {
     alert("You're that old!")
  }

  if (val2 == 1) {
     val2x = 13;
     val3 = val3-1
  }

  if (val2 == 2) {
      val2x = 14;
     val3 = val3-1
  }

  var val4 = parseInt(((val2x+1)*3)/5, 10)
  var val5 = parseInt(val3/4, 10)
  var val6 = parseInt(val3/100, 10)
  var val7 = parseInt(val3/400, 10)
  var val8 = val1+(val2x*2)+val4+val3+val5-val6+val7+2
  var val9 = parseInt(val8/7, 10)
  var val0 = val8-(val9*7)

  form.result1.value = months[val2]+" "+form.day.value +", "+form.year.value
  form.result2.value = days[val0]
}

kevinxp06

#1
Disculpen, me falto decir que la idea es conocer el dia de la semana, o sea Lunes, martes, miercoles.etc...
Los datos a ingresar son: la fecha numerica del dia, el numero del mes y el año.

No me dan los parentesis de la formula en pseint, no se que ocurre.

Si alguien puede darme una mano, lo agradeceria.
y antes de que se presente el inoportuno comentario, no es una tarea, ni un trabajo, ni nada por el estilo.
Estoy migrando desde windows a linux y deseo aprender a programar.
Me dirigi a un amigo programador para que me colaborara con algunos ejercicios, de los cuales he resuelto todos, pero este me tiene intrigado.
Lo mas lejos que he llegado ah sido esto, luego de varios intentos, pero no funciona:

Proceso diasemana2
   Escribir "Ingrese un Dia de la Semana (0-6 Siendo 0 Domingo)"
   Leer dia
   Escribir "Ingrese el Mes (1-12)"
   leer mes
   Escribir "Ingrese el Año"
   leer año
   v1<-dia
   v2<-mes
   v3<-año
   v4<-((mes+1)*3/5)
   v5<-(año/v4)
   v6<-(año/100)
   v7<-(año/400)
   v8<-dia+(mes*2)+v4+v3+v5-v6+v7+2
   v9<-(v8/7)
   v0<-v8-(v9*7)
   diasem<-v0
   Si dia>6 o dia < 0 & mes < 1 o mes > 12 Entonces
      Escribir "Error en el ingreso"
   Sino
   FinSi
   Escribir v0
FinProceso