Bazar ertəsi, 03.08.2020, 18:29
İ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ı: 8137
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
    «  Avqust 2020  »
    B.e.Ç.a.ÇC.a.CŞB
         12
    3456789
    10111213141516
    17181920212223
    24252627282930
    31
    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 © 2020
    PYTHON 3.4
    ALPLogo
    Info-Ko
    Fəxr edirik


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