Aviseringar
Rensa alla

Programmering A


jen91
Ämnesstartare

Hej kan någn hjälpa mig skriva en kod till denna uppgiften, programmerar i Turbo Delphi.

Gör ett Program som omvandlar ett positivt heltal till dess binära form. DEt räcker med att programet klarar av att omvandla ett 4 siffrigt tal. Exempel på utskrifter:
Talet 1234 i binär form är 111 1011

Tacksam för hjälp [bigsmile]


   
Citera
Gifted

jen91:

rogrammerar i Turbo Delphi.

Det är inget språk... men jag antar att du menar Pascal?

Men lite pseudokod:


while tal>0 do
if tal mod 2 = 1
skriv 1
else
skriv 0

tal := tal / 2 (avrunda)

Observera att detta skriver ut den binära strängen i FEL ordning, (baklänges), så du måste spara utskrifterna, vända strängen, och sedan skriva ut. (Om du vill använda denna algoritm.)


   
SvaraCitera
jen91
Ämnesstartare

Gifted:

Men lite pseudokod:

while tal>0 do if tal mod 2 = 1 skriv 1 else skriv 0 tal := tal / 2 (avrunda)

ok tack för hjälpen[smile], aa jag menar pascal, behöver hjälp med en uppgift till[crazy]:

Gör ett program som slumpar fram en lottorad . det vill säga det ska skriva ut sju olika tal från 1 till 35 . Man ska använda arrayer.


   
SvaraCitera
Gifted

jen91:

det vill säga det ska skriva ut sju olika tal från 1 till 35 . Man ska använda arrayer.

Ah. Problemet här är att talen skall vara OLIKA. Dessutom så måste man se till att de kommer med samma sannolikhet.


talArray := {1..35} (en array med talen mellan 1 och 35)

for i:= 1 to 35 do

swapIndex := Slumptal(i,35) //Slumpa tal mellan i och 35 (inklusivt)
temp := talArray
talArray := talArray[swapIndex]
talArray[swapIndex] := temp

for i:=1 to 7 do
skrivUt talArray

Denna algoritm är i princip http://en.wikipedia.org/wiki/Knuth_shuffle

och garanterar att inga tal är mer poppis än andra.


   
SvaraCitera
Gifted

Pascal? WTF? Vem lär sig pascal nu för tiden? Helt värdelöst...


   
SvaraCitera
jen91
Ämnesstartare

Gifted:

Ah. Problemet här är att talen skall vara OLIKA. Dessutom så måste man se till att de kommer med samma sannolikhet.

ok[smile] men vad menas med temp och swapindex?, vad ska man använda för variabler?

tack för hjälpen[bigsmile]


   
SvaraCitera

Vafan, kodar ni i Pascal [confused]


   
SvaraCitera
Gifted

jen91:

men vad menas med temp och swapindex?, vad ska man använda för variabler?

temp och svapIndex är variabler, helt enkelt.


   
SvaraCitera
jen91
Ämnesstartare

Gifted:

Observera att detta skriver ut den binära strängen i FEL ordning, (baklänges), så du måste spara utskrifterna, vända strängen, och sedan skriva ut. (Om du vill använda denna algoritm.)

jag fattar inte riktigt vad du menar med detta [shake], är lite trög[crazy], tack för all hjälp


   
SvaraCitera
Gifted

jen91:

jag fattar inte riktigt vad du menar med detta

Koda algoritmen, kör. Testa. Det är så man lär sig. Du kommer nog på vad som händer.


   
SvaraCitera
jen91
Ämnesstartare

Gifted:

Koda algoritmen, kör. Testa. Det är så man lär sig. Du kommer nog på vad som händer.

men du menar att jag ska skriva koden baklänges, alltså börja bakifrån?


   
SvaraCitera
Gifted

jen91:

men du menar att jag ska skriva koden baklänges, alltså börja bakifrån?

Nej, alltså, testa att programmera den. Du kommer upptäcka att om du vill ha utskriften 1101 så skrivs 1011 ut...


   
SvaraCitera

Tråden låst på grund av inaktivitet


   
SvaraCitera