programa sumador

[tsue]

Empezado por Delphius

Sugiero que leas un poco la ayuda sobre Application.MessageBox(), lo estás usando mal. Por empezar recibe muchos parámetros y te va enrredar más.
Te he sugerido que para comenzar el ShowMessage. Es sencillo. Un ejemplo:

Código Delphi [-]ShowMessage('el valor a mostrar es : ' + IntToStr(50));
ShowMessage('el valor a mostrar es : ' + IntToStr(valor)); // valor es una variable


Sugiero que nombres a la variable aplazo de un mejor modo... ¿porqué no total? Se entiende mejor.

Veamos, como te explico la cosa sin hacerte la tarea:

1. Pedir valor inicial, guardar en la variable inicial
2. Pedir valor final, guardar en la variable final
3. Hacer que total sea cero
4. Hacer que cantidad sea cero
5. Mientras inicial sea menor a final hacer:
5.1. incrementar el total con el inicial
5.2. incrementar cantidad en 1
5.3. incrementar inicial en 1
6. dividir total con cantidad y guardarlo en promedio
7. Mostrar promedio

¿Ahora se entiende?

Tu problema es que en ningún momento llevas la cuenta de iteraciones.
Ahora es tu turno traducir esto. Intentalo.

Saludos,

ok creo k ya te entendi con lo de ShowMessage para mostrar un numero hay k poner into string(numero) (Inttostr(50))

si estoy bien ya nomas me falta traducir lo de mas

[[Caral]]

Hola
La verdad no se a donde va todo esto, lo que creo que se necesita es hacer un ciclo con while.
Alguien me explica donde esta la ciencia?.
Saludos
Pd: pregunta de Novato

[[cHackAll]]

Empezado por Caral

...Alguien me explica donde esta la ciencia?...

Claro, la ciencia está en entender que sucede con el teclado de tsue que de rato en rato no le funcionan algunas teclas

[ecfisa]

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
con,sum: integer;
begin
con:= 9;
sum:= 0;
while con < 50 do
begin
inc(con);
sum:= sum + con;
end;
ShowMessage(FloatToStr(sum / 40));
end;
[/delphi]

[Robert01]

Lo haré cuando tenga tiempo

[[Delphius]]

Empezado por Caral

Hola
Estas seguro amigo?.
No se, algo me falta, por eso te lo pregunto.
Saludos

Disculpa Carlos, ¿me lo preguntas a mi?

Tal vez lo que si está faltando, y ya lo dirá tsue, es como suministrar el valor inicial y final.

Saludos,

[[Caral]]

Hola
Creo, segun lo que veo, que tsue deberia empezar un par de pasos atras para tratar de entender el concepto.
Si no se sabe como trabaja un string o como se hace una traformacion string a integer creo que sera muy dificil entender el concepto de un ciclo y mucho menos saber que los datos se necesitan suministrar o por variables o por edits e incluso saber el concepto de un mensaje, como se lo as tratado de explicar.
Me parece que lo recomendable seria un buen libro.
No estoy menospreciando a tsue, lo que me parece es que quiere correr antes de caminar.
Saludos

[[Delphius]]

Empezado por Caral

Hola
Creo, segun lo que veo, que tsue deberia empezar un par de pasos atras para tratar de entender el concepto.
Si no se sabe como trabaja un string o como se hace una traformacion string a integer creo que sera muy dificil entender el concepto de un ciclo y mucho menos saber que los datos se necesitan suministrar o por variables o por edits e incluso saber el concepto de un mensaje, como se lo as tratado de explicar.
Me parece que lo recomendable seria un buen libro.
No estoy menospreciando a tsue, lo que me parece es que quiere correr antes de caminar.
Saludos

Yo también le recomendaría a tsue que leyera algún libro, tutorial o manual. En su caso le sería mejor empezar con el libro de Pascal de Luis Goyanes (no recuerdo si se escribe así, disculpen) Aguilar para que se familiarice con la sintaxis.
Perderle el miedo a presionar F1 también es necesario.

Y luego darse el paseo por el FTP para material más "avanzado".

Desconozco si se trata de algo para alguna materia en una tecnicatura, facultad, o escuela. No quisiera desmerecer al profesor de tsue, pero tras unos cuantos hilos en donde vienen los estudiantes recién iniciados noto la falta de conceptos básicos.
Me parece que en esto los profesores deberían tomar más conciencia y dedicar un poco de tiempo de la cátedra a repasos de conceptos básicos, lógicos y abstractos en vez de pedir más código. Hace falta más poder de análisis y de lógica.
Al menos esa sensación me está quedando.

Saludos,

[[Caral]]

Hola
El ejemplo de cHackAll me parece que hace lo que necesita tsue y creo que no lo ha podido ver, me sigue pareciendo que necesita la tarea.
Bueno, como ya sabéis soy débil así que aquí esta el ejemplo de cHackAll pero traducido para Aprendiz.
Esta vez los datos los puede variar ya que uso edits, creo que le dará a tsue algo mas que pensar.
Saludos

[Robert01]

Hola

Aquí el problema es que las variables que usa son difíciles de entender.
No se puede ver que relación hay entre escuela, tarea y aplazo.
Lo que está mal y que complica todo es el nombre que le dio a las variables.

Saludos

[tsue]

Empezado por Delphius

Yo también le recomendaría a tsue que leyera algún libro, tutorial o manual. En su caso le sería mejor empezar con el libro de Pascal de Luis Goyanes (no recuerdo si se escribe así, disculpen) Aguilar para que se familiarice con la sintaxis.
Perderle el miedo a presionar F1 también es necesario.

Y luego darse el paseo por el FTP para material más "avanzado".

Desconozco si se trata de algo para alguna materia en una tecnicatura, facultad, o escuela. No quisiera desmerecer al profesor de tsue, pero tras unos cuantos hilos en donde vienen los estudiantes recién iniciados noto la falta de conceptos básicos.
Me parece que en esto los profesores deberían tomar más conciencia y dedicar un poco de tiempo de la cátedra a repasos de conceptos básicos, lógicos y abstractos en vez de pedir más código. Hace falta más poder de análisis y de lógica.
Al menos esa sensación me está quedando.

Saludos,

hola, primero k nada muchas gracias por la ayuda k me estan brindando por una parte siento k me la estan regando un poco, pero bueno, por cierto la escuela es de nivel universitario, y me meti a ing en systemas, pero me toco un profe que no queria ke me tocara ya que hace todo como si lo supieramos, y para acabarla yo sali de electronico y apenas estoy biendo programacion. se k voy a batallar y voy a tener k leer libros y preguntar pues no se nace sabiendo, pero ahora ando algo preocupado pues no kiero empezar mal y estoy tratando de entender todo esto

[[Delphius]]

Empezado por tsue

hola, oye me intereso mucho el programa de este chavo sobre todo en la parte de

function MediaUntil(a, b: Cardinal): Cardinal;

asm
xchg eax, edx
xchg eax, ecx
xor eax, eax
cmp ecx, edx
jb @Exit
sub ecx, edx
push ecx
@Next:inc edx
add eax, edx
loop @Next
xor edx, edx
pop ecx
div ecx
@Exit:

pero no entiendo lo que kieren decir, estube leyendo en la ayuda de delphi, pero lo malo k esta en ingles, y tmb en wiky pero no encuntro todo muy claro
porcierto cuales son los comandos de suma y divicion

El código que ves escrito es ensamblador, o mejor conocido como lenguaje máquina. No es por ser malo pero... si no comprendes los lenguajes de mayor nivel... este menos.

A vista rápida puedo decirte que lo que hace es mover el contenido de un registro a otro, de vez en cuando hace un loop (bucle) y por el final me parece ver lo que es una división entera. Yo de ASM no se mucho... pero Chackall puede explicarnos algunas cosas.

¿Comandos de suma y división? ¡No existen comandos en Delphi! A lo que tal vez te refieres es a operadores:

suma: +
resta: -
división entera: div
división: /
multiplicación: *
resto: mod

La ayuda viene en inglés... pero no hay escusa. Hay que leerla. Hay traductores de todos los gustos y sabores, tanto on-line como off-line. Nos guste o no, el que desea meterse en informática se tiene que acercar al inglés. A mi tampoco me agrada pero que se la va a hacer... hay que ser mejor que Schumacher: ¡A darle a la F1!

Empezado por tsue

hola, primero k nada muchas gracias por la ayuda k me estan brindando por una parte siento k me la estan regando un poco, pero bueno, por cierto la escuela es de nivel universitario, y me meti a ing en systemas, pero me toco un profe que no queria ke me tocara ya que hace todo como si lo supieramos, y para acabarla yo sali de electronico y apenas estoy biendo programacion. se k voy a batallar y voy a tener k leer libros y preguntar pues no se nace sabiendo, pero ahora ando algo preocupado pues no kiero empezar mal y estoy tratando de entender todo esto

Nadie dijo que hayas nacido genio ni te ha tratado como un tonto, simplemente hice una opinión de lo parece ser la educación universitaria en general en cuestiones de la enseñanza sobre lenguajes y programación.
Si podemos apreciar que estás confundido y esto se debe a que la enseñanza ha sido pobre y/o el estudiante no pone la debida atención.

Veo que descubriste una gran verdad: hay que leer. Por algo están los libros. Y una gran verdad es que uno no debe quedarse unicamente con lo dicho en las cátedras. Mejor te lo digo ahora antes de que sea tarde: en la universidad no te enseñarán todo, te dan lo básico y suficiente para que comprendas los conceptos y tengas el conocimiento adecuado para ponerlo en la práctica.
Disculpa que haya sido duro, pero es la gran verdad. La formación universitaria no te prepara para conocer todo. Te prepara para que tu mismo lo descubras.

Por cierto, si no te es molestia ¿podrías escribir un tantito mejor? Hace un poco de daño a la vista ver demasiadas ks. Me ha costado leer y comprender tus oraciones.

Saludos,