Cümə axşamı, 26.12.2024, 23:01
İnformatikanın məktəbdə tədrisi
Baş səhifə Qeydiyyat Giriş
e-mail: informatik-az@mail.ru · RSS
Menyu
Fotoşəkillər
Giriş forması
Sorğu
Müəllim kimi informatika dərslərində tez-tez istifadə edirəm:
Cavabların sayı: 9496
Faydalı keçidlər

  • ict.edu.az
  • ict.az
  • telekommunikasiya.edu.az
  • İnf-math.narod.ru
  • Millibyte.az
  • kayzen.az/blog/informatika
  • alqoritm.ucoz.org
  • mincom.gov.az
  • Facebook-da
    Təqvim
    «  Dekabr 2024  »
    B.e.Ç.a.ÇC.a.CŞB
          1
    2345678
    9101112131415
    16171819202122
    23242526272829
    3031
    Təqdimatlar
    Statistika

    Onlayn: 1
    Ziyarətçilərin sayı: 1
    Qeydiyyatdan keçənlərin sayı: 0


     M-6
    Geri

    Beşrəqəmli natural ədəd verilmişdir. Ən solda yerləşən rəqəmdən başlayaraq bütün rəqəmlərin artma sırası ilə yerləşdiyini  müəyyən etmək lazımdır.  Məsələn, 15689 ədədində bütün rəqəmlər artma sırası ilə yerləşir.


    Ədədin a, b, c, d, e bütün rəqəmlərini ayırıb,  (e<d)  və  (d<c)  və  (c<b) və  (b<a) şərtini yoxlayırıq.

    Əgər şərt ödənilirsə, onda bütün rəqəmlər artma sırası ilə yerləşir, əks halda artma sırası ilə yerləşmir.

     Program A1_6;

    var

    a,b,c,d, e:integer;  n:longint;

    begin

            readln(n);

            a:=n mod 10;

            b:=(n div 10) mod 10;

            c:=(n div 100) mod 10;

            d:=(n div 1000) mod 10;

            e:=(n div 10000) mod 10;

            if (e<d)  and  (d<c)  and  (c<b)  and  (b<a)

             then writeln('YES')

             else writeln('NO');

            readln;

    end.

    //Program A1.6

    #include <iostream>

     using namespace std;

     int main()

    {   int a,b,c,d,e;  long n;

        cin>>n;

        a=n%10;

        b=(n/10)%10;

        c=(n/100)%10;

        d=(n/1000)%10;

        e=(n/10000)%10;

        if(e<d  &&  d<c  &&  c<b  &&  b<a) cout<<"YES\n";

         else    cout << "NO\n";

        return 0;

    }

     


    Copyright İsaNaida © 2024
    PYTHON 3.4
    ALPLogo
    Info-Ko
    Fəxr edirik


    Elan
    Bölmələr
    MÜSABİQƏ
    Azərbaycanda İKT
    Axtarış