Soru Sayılar

Konusu 'Doğal Sayılar,Tam Sayılar,Bölme Bölünebilme,EBOB-EKOK' forumundadır ve murat_16 tarafından 15 Aralık 2016 başlatılmıştır.

Yüklüyor...
  1. murat_16

    murat_16 Yeni Üye

    Mesajlar:
    473
    Beğenileri:
    32
    AB ve CD iki basamaklı ABAB ve CDCD dört basamaklı doğal sayılarla ilgili aşağıdaki bilgiler bilinmektedir
    AB《CD
    ABAB+CDCD toplamından elde edilen sayıyı tam olarak bölen 6 farklı tamsayı vardır. Buna göre AB sayısının alabileceği kaç farklı değer vardır?
    25 30 35 41 49

    1010(A+C)+101(B+D)
    101[10(A+C)+(B+D)]=101^2
    A+C=10
    B+D=1 buraya kadar geldim gerisini getiremedim daha doğrusu bulduğum cevap şıklarda yok
    murat_16, 15 Aralık 2016
    #1

    2. Benzer Konular: Sayılar
    Forum Başlık Tarih
    Ivır Zıvır Sorular - Sohbet (Trivial Questions - Chat) İki ve Üç Basamaklı Sayılar Salı 10:05
    Ivır Zıvır Sorular - Sohbet (Trivial Questions - Chat) Üstel Sayılı Denklem - Rasyonel Sayılarda Payda Eşitleme 13 Nisan 2024
    Matematik - Geometri Dikdörtgende Çevre - Kareköklü Sayılar (8. Sınıf) 3 Nisan 2024
    Limit ve Süreklilik,Türev,İntegral Değişim Hızı - Türev - Üçgen Prizmada Hacim - Üstel Sayılar 29 Mart 2024
    Ivır Zıvır Sorular - Sohbet (Trivial Questions - Chat) Geometri - Orantı - Kareköklü ve Üstel Sayılar - Trigonometri (12 Soru) 24 Mart 2024

  2. Honore

    Honore Yönetici Yönetici

    Mesajlar:
    9.284
    Beğenileri:
    655
    Cinsiyet:
    Bay
    Meslek:
    Müh. (Elk./Bilg.)
    Ancak bilgisayarla çözebildim ama 34 farklı AB değeri bulabiliyorum. Zamanı olan sayın hocalarımızdan belki bir çözüm gelebilir, bu arada isterseniz başka forumlara da sorun.
    Not: Çözüm gelene kadar dikkat çekmesi için soruyu sabitledim.

    [​IMG]
    https://i.ibb.co/BTT39SH/sayilar.png

    ---Merak edenler için Fortran Programı---
    Kod:
    program bolunme
implicit none
integer :: A,B,C,D,i=0,say=0,j=0,k,toplam=0
integer :: ABAB(10000),CDCD(10000),sayi(10000),bolen(100000)

open (unit = 1, file = "sayilar.txt")
write (1,*) "ABAB---CDCD----TOPLAM---------------------BOLENLER------------"

do A=1,9
  do B=1,9
    do C=1,9
      do D=1,9
         if ( (A < C).AND.(A /= B).AND.(A /= C).AND.(A /= D) &
            .AND.(B /= C).AND.(B /= D).AND.(C /= D) ) then
             ABAB(i)=1000*A+100*B+10*A+B        
             CDCD(i)=1000*C+100*D+10*C+D
             sayi(i)=ABAB(i)+CDCD(i)
             j=i
             i=i+1
         else
             cycle
         endif                  
      enddo
    enddo
  enddo
enddo

do j=1,i
   do k=1,sayi(j)
     if(mod(sayi(j),k)==0) then
       say=say+1
       bolen(say)=k
     endif
   enddo
   if (say==6) then
      write(1,5) '',ABAB(j),'   ',CDCD(j),'     ',sayi(j),'     ',   &
                 bolen(1),bolen(2),bolen(3),bolen(4),bolen(5),bolen(6)
      toplam=toplam+1
   endif
   say=0
enddo
print*,toplam,' adet farkli AB degeri var. sayilar.txt dosyasina bakiniz.'
write(1,*)''
write(1,*)'      ',toplam,'adet farkli AB degeri var.'
close(1)
5 format (a1,i4,a3,i4,a5,i5,a5,6(i6))

end program
    Honore, 16 Aralık 2016
    #2
  3. murat_16

    murat_16 Yeni Üye

    Mesajlar:
    473
    Beğenileri:
    32
    Hocam ben soruyu daha sonra çözdüm hatta çözümü de yazdım ama yazdığum çözümü göremedim.
    101(10(A+C)+B+D)=101^2
    101(AB+CD)=101^2
    AB+CD=101
    AB en az 10 en fazla 50 değerini alır
    Yani 41 değer alır
    murat_16, 19 Aralık 2016
    #3
  4. Honore

    Honore Yönetici Yönetici

    Mesajlar:
    9.284
    Beğenileri:
    655
    Cinsiyet:
    Bay
    Meslek:
    Müh. (Elk./Bilg.)
    Bir şey diyemeyeceğim çünkü mesela ABAB için 5252 ve CDCD için de 6969 gibi iki sayının toplamı olan 12221 sayısının da 6 farklı böleni var. Belki sorıuyu yanlış anlayıp bilgisayara da yanlış bir iş yaptırıyor olabilirim.
    Honore, 20 Aralık 2016
    #4

Sayfayı Paylaş