Ejemplo ciclo for pascal.
{
Bueno aquí otro ejemplo en turbo pascal en esta ocasión mostrare el uso del for sacando la multiplicación de los primeros 10 números del numero introducido:
aqui el codigo
Program P3AE4 (input,output); uses crt; Var numero,i,total,fact: Integer; Begin writeln('Introdusca numero del cual quiere ver su multiplicacion del 1 al 10:'); readln(numero); for i:=1 to 10 do begin total:=numero*i; writeln(numero,' * ', i,' = ',total); end; readkey; end.
Descargar código:
}
© 2025 TAS All rights reserved.