Matematik sorusu

[shapshal]

7 haneli bir sayinin son 4 hanesini basa alinca , olusan sayi eski sayinin 2 katindan 1 eksik oluyor . bu sayi nedir?

[cambazct]

8

[Ardeth]

7 haneli sayisi
edit:
yeni sayıyı 1000000d + 100000e + 10000f + 1000g + 100a + 10b + c diye yaz bunu 2000000a + 200000b + 20000c + 2000d + 200e + 20f + 2g -1 e eşitle.

[Osso]

adam bence bize sormuş

[Ardeth]

pardon abi

[Ardeth]

ha bi de sonra bilgisayara a,b,c,d,e,f üzerinde 1den 9a bir loop yazdırıp hangi rakamların o eşitliği sağladığına bak sfsd

[shapshal]

valla cozemedigimden sordum esasen , hala da cozebilmis degilim

[Ardeth]

ya çok fazla hane var bunun bir kolay yolu vardır herhalde ben bilemedim

[Ardeth]

Ardeth said:

7 haneli sayisi
edit:
yeni sayıyı 1000000d + 100000e + 10000f + 1000g + 100a + 10b + c diye yaz bunu 2000000a + 200000b + 20000c + 2000d + 200e + 20f + 2g -1 e eşitle.

aslında bu eşitliğe bakıp tahmin edince çıkıyor sanırım

d=2a
e=2b
f=2c
g=2d
a=2e
b=2f
c=2g-1

tam olarak 7 denklem ve 7 bilinmeyen

[huun]

zorlama işte ardeth bilemedin.

[Ardeth]

evet denklemleri çözünce tam sayı çıkmadı a,b,c falan sdf

[Longshanks]

visual basicte deniyim bi

[barnacle]

orta okulda öğretiyolar bunları

[Bone]

2(abcdefg)-1=defgabc
2g+20f+200e+2000d+20000c+200000b+2000000a-1=c+10b+100a+1000g+10000f+100000e+1000000d

[Cairne]

40 yapar

[Bone]

Cairne said:

40 yapar

ve milliyetçi hareket partisinin 40. yıl dönümü!

[Longshanks]

[Deacon]

VISUAL BASIC? SERIOUSLY!

[barnacle]

matLab e sorduk cleveland dedi.

[Bone]

Longshanks said:

c=b+a desek?

ha bi de çarpma işlemi yaparken string'i integer'a çevirmen,
string işlemi yaparken integer'dan tekrar string'e çevirmen gerekmiyor muydu?

[Longshanks]

çarpma işlemini zaten integer ile yapıyo
val(c) dediğin zaman sayı değerini alıyo ordan
i zaten string değil

[Longshanks]

ya siz de deneyin ya harbi böyle bi eşitlik sağlanmıyo ya da ben hata yaptım bi yerlerde

[fede]

ben çözmeye çalıştım

0=0 çıktı. çok üzüldüm

[Longshanks]

Private Sub Command1_Click()
Dim a As String
Dim b As String
Dim c As String
Dim d As String

For i = 1000000 To 9999999

a = Mid(i, 1, 3)
b = Mid(i, 4, 4)
c = b + a

If Val(c) = (2 * i) - 1 Then
d = Str(i)
Print d
Else
Text1.Text = "yok la böyle bi sayı"
End If

Next i



End Sub


böyle değiştirdim bone un dediği gibi yine 2 saat çalıştı ve
"yok la böyle bi sayı" dedi

[Eralp]

sdfdsf