• Miércoles 15 de Abril de 2026, 20:46

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - pascal

Páginas: [1]
1
Pascal / Re: Random!!
« en: Martes 12 de Agosto de 2008, 09:43 »
Código: Text
  1. var
  2.  
  3.    num, n, i,contador1,contador2,contador3,contador4,contador5,contador6 : integer;
  4.    porcentaje : real;
  5.  
  6.  
  7.    begin
  8.    randomize;
  9.  
  10.  
  11.    writeln('Escriba cuantas veces se tira el dado.');
  12.    readln(num);
  13.  
  14.  
  15.   for i:=1 to num do
  16.       begin
  17.            n:= random(6) +1;
  18.           { writeln(n); }
  19.            contador1:=0;
  20.            contador2:=0;
  21.            contador3:=0;
  22.            contador4:=0;
  23.            contador5:=0;
  24.            contador6:=0;
  25.  
  26.                         repeat
  27.                               if n=1 then
  28.                               contador1:=contador1 + 1
  29.                               else if n=2 then
  30.                               contador2:= contador2 + 1
  31.                               else if n=3 then
  32.                               contador3:= contador3 + 1
  33.                               else if n=4 then
  34.                               contador4:= contador4 + 1
  35.                               else if n=5 then
  36.                               contador5:= contador5 + 1
  37.                               else if n=6 then
  38.                               contador6:= contador6 + 1;
  39.                         until num;
  40.  
  41.  
  42.       end;
  43.  

el error me lo da en el repeat!

2
Pascal / Re: Random!!
« en: Lunes 11 de Agosto de 2008, 11:42 »
acudo a ustedes con otro problema.

resulta que despues de hacer el random, lo que quiero es que cuente cuantas veces sale cada numero, y con lo cual hago un contador para que cuente con cada numero del 1 al 6 que genera el random. hago un bucle repeat dentro del for para el contador, pero al compilar me da error en el repeat, y el error es este : Type mismatch.alguien sabe porque me da ese error? gracias de nuevo

3
Pascal / Re: Random!!
« en: Lunes 11 de Agosto de 2008, 10:56 »
gracias por tu ayuda amigo enko

4
Pascal / Random!!
« en: Jueves 7 de Agosto de 2008, 12:04 »
Buenas, mi porblema es:


tengo que hacer un programa que al lanzar un dado X veces, sacar el porcentaje de de cada numero que ha salido. el problema es que al hacer el random como hago para que sea cada vez que tiro, es decir cada tirada que realice, que actue el random. Con un bucle while? y también como sería para que en el random no entrase el 0, solo fuese del 1 al 6, ay que son los nuemros de las caras del dado.



Espero su respuesta y muchas gracias por todo

Páginas: [1]