Notifications
Clear all

Programmering A


jen91
Topic starter

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]


   
Quote
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.)


   
ReplyQuote
jen91
Topic starter

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.


   
ReplyQuote
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.


   
ReplyQuote
Gifted

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


   
ReplyQuote
jen91
Topic starter

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]


   
ReplyQuote

Vafan, kodar ni i Pascal [confused]


   
ReplyQuote
Gifted

jen91:

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

temp och svapIndex är variabler, helt enkelt.


   
ReplyQuote
jen91
Topic starter

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


   
ReplyQuote
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.


   
ReplyQuote
jen91
Topic starter

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?


   
ReplyQuote
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...


   
ReplyQuote

Tråden låst på grund av inaktivitet


   
ReplyQuote