Pbp da % (Yüzde) Hesaplama

[mustafacan]

elde bulunan 2 adet 4 haneli sayının % oranını pbpde nasıl hesaplatabilirim?

SAYI1= 3300        1.sayı (4 hane)
SAYI2= 0001        2.sayı (4 Hane)
SAYI3= ??,??        SAYI1 in SAYI ye % oranı (2+2 Hane) sonuç!

[cuneytsezmis1]

SAYI3 değişkenini float olarak tanımlamalısın.
kolay gelsin.

[mustafacan]

örnek verebilirmisiniz?

[cuneytsezmis1]

SAY1 VAR BYTE
SAY2 VAR BYTE
SAY3 VAR FLOAT

SAY3=SAY1/SAY2

eğer çıkan sonucu lcd de göstermek istersen

print at 1,1,dec2 SAY3

yazdığıda virgülden sonra iki rakam görürsün

print at 1,1,dec3 SAY3
yazarsan virgülden sonra üç rakam görürsün.

[vsalma]

Pbp da Float değişken türü var mıydı?

[mustafacan]

maalesef % olarak hesaplamıyor

[sitenindelisi]

Tam değerler ile istiyorsanız, Proton kullanarak olur. PBP ile ise
kısmi sonuç elde edebilirsiniz.( noktadan sonraki basamak sayısı kadar genişleterek (3,14*100=314 gibi) ama helpi inceleyerek değişken sınırlarını dikkate almalısınız bu durumda).

Proton için ;

Dim SAY1 as BYTE
Dim SAY2 as BYTE
Dim SAY3 as FLOAT

.
.
.
MAIN:
SAY3=(SAY1*100)/SAY2
Print at 1,1,"ORAN = %",Dec2 SAY3 ' Noktadan sonra 2 basamak gösterir.

[mustafacan]

Tam değerler ile istiyorsanız,

ilk mesajımda ki örnek olarak ele alabiliriz. WORD tanımladığımız için max değer 65535 dir. dolayısıyla 3300 ü 100le çarpma ihtimalimiz yok! Bizim 7 segment displaylarımız en fazla 9999 a kadar sayıyor. % oran displayı ise %00,00 hesaplaması gerekiyor

[ete]

Şunları bir dene;

Temp=SAYI1*100
SAYI3=DIV32 SAYI2

YUZDE=SAYI3/100
KESIR=SAYI3//100

Ete

[uzaylivolkan]

nezamandır PBP da float değişken var

[ustad]

Ya da şöyle yazılabilir.

sayi_gecici=SAYI1*1000
SAYI3=DIV32 sayi_gecici

sayi3 ün binler ve onbinler basamağı sizin yüzde değerininiz birler ve onlar basamağı, sayi 3 ün onlar ve birler basamağıda yüzde değerinin kesir hali.

Dig komutu ile bu değerler alıp kullanabilirsiniz.

Kolay Gelsin...