Platforma educațională CURS

a IX-a A

27 lecții INFORMATICĂ | 34 lecții T.I.C.

Informatică

█

Lectia 12_2 --- [ 0 Probleme rezolvate ]

1. Să se determine cele mai mici două cifre ale unui număr.

Propune o soluție mai bună

Citeste n         
m1=10                             
m2=11       
Cat timp n>0 executa
       Daca n%10 < m1 atunci     // ordinea crescatoare   n%10,   m1,  m2 
                     m2=m1  
                     m1=n%10
         Altfel  
               Daca n%10 < m2 atunci       // ordinea crescatoare     m1, n%10, m2 
                           m2=n%10              
                Sfarsit Daca
         Sfarsit Daca
   n=cat(n,10)
Sf Cat timp
Scrie m1, '  ', m2

S o l u ț i a:
Introdu următorul text:	~~288277655~~

2. Să se determine cele mai mari două cifre ale unui număr.

Propune o soluție mai bună

Citeste n
M1 = -1
M2 = -2
Cat timp n>0 executa
       Daca n%10 > M1 atunci          // ord crec        M2, M1, n%10
                  M2=M1
                   M1=n%10
          Altfel
                   Daca n%10>M2  atunci    // ord crec        M2, n%10,  M1
                              M2=n%10
                    Sfarsit Daca
          Sfarsit daca
   n=cat(n, 10)
Sf Cat timp
Scrie M2, ' ', M1

S o l u ț i a:
Introdu următorul text:	~~32148033~~

3. Să se determine cele mai mici două cifre pare ale unui număr.

Vezi soluţia ta

Corectează soluția

citeste n
min1=10
min2=11
cat timp n>0 executa
   daca n%2=0 atunci
          daca n%10<min1 atunci
               min1=n%10
          altfel
                daca n%10<min2 atunci
                    min2=n%10
sf daca
sf daca
sf daca
   n=cat(n,10)
sf cat timp
daca min1=-1 atunci 
    scrie ,, nu are cifre pare"
altfel
    scrie min1 , ,, ' , min2

Citeste n
m1=10
m2=12
Cat timp n>0 executa
      Daca n%2=0 si n%10<m1 atunci      //   n%10,  m1, m2
                   m2=m1
                   m1=n%10
       Altfel
             Daca n%2=0 si n%10<m2 atunci      //    m1,  n%10,  m2
                        m2=n%10
              Sf Daca
       Sf Daca
n=cat(n, 10)
Sf Cat timp
           Daca m1=10 atunci
                 Scrie "Nu sunt cifre pare"
           Altfel
                  Daca m2>=10 atunci
                         Scrie "O singura cifra para ",m1
                     Altfel
                            Scrie m1, " ",m2
                     Sf Daca
              Sf. Daca

S o l u ț i a:	citeste n min1=10 min2=11 cat timp n>0 executa daca n%2=0 atunci daca n%10<min1 atunci min1=n%10 altfel daca n%10<min2 atunci min2=n%10 sf daca sf daca sf daca n=cat(n,10) sf cat timp daca min1=-1 atunci scrie ,, nu are cifre pare" altfel scrie min1 , ,, ' , min2
Introdu următorul text:	~~358943114~~

4. Să se determine cele mai mari două cifre impare ale unui număr.

Propune o soluție mai bună

Citește n
M1= -1
M2= -2
Cat timp n >0 executa
     Daca n% 2= 1 și n%10 >M1 atunci
                 M2=M1
                  M1=n%10
           Altfel 
      Daca  n%2 =1 și n%10 >M2 atunci
                 M2=n%10
        Sfârșit daca
         Sfârșit daca 
             n=cat (n ,10)
         Sfârșit cât timp
     Daca M1= -1 atunci 
            Scrie 'Nu sunt cifre impare'
        Altfel
             Daca M2 <= -1 atunci
                    Scrie 'O singura cifră impara ' , M1
        Altfel 
               Scrie  M1 ,'   ' ,M2
       Sfârșit daca
       Sfârșit daca

S o l u ț i a:
Introdu următorul text:	~~142989604~~

5. Să se determine numărul obținut prin tăierea primei cifre.

Propune o soluție mai bună

Citeste n        // 48652 ->   25684 ->  2568 -> 8652
Og=0              //     n              Og         Og/10      n      
    Cat timp n>0 executa
            Og=Og*10+n%10
             n=cat(n, 10)
     Sf. Cat timp
Og=cat(Og, 10)
n=0
Cat timp Og>0 executa
       n=n*10+Og%10
       Og=cat(Og, 10)
Sf. Cat timp
Scrie n