|
|
Liceul Teoretic "Ion Creangă" Popeștii de Sus | |
|
Luni, 2024-05-06, 7:36 AM | |
|
Bine aţi venit Vizitator | RSS | |
Informatica
| |
ygory1 | Data: Marţi, 2014-04-22, 1:21 PM | Mesaj # 1 |
Locotenent
Grup: Administratori
Mesaje: 37
Status: Offline
| Aici se vor discuta diferite probleme de pascal si de construcția calculatorului.
|
|
| |
ygory1 | Data: Marţi, 2014-04-22, 1:35 PM | Mesaj # 2 |
Locotenent
Grup: Administratori
Mesaje: 37
Status: Offline
| Probleme.Tipuri simple de date. 1. Scrieţi un program Pascal, care determină numărul de cifre ale numărului natural N. De exemplu: N=1290. 4 cifre 2. Scrieţiun program Pascal care determină dacă numărul natural N este divizibil prin suma cifrelor lui. De exemplu: N=370 Da 3. Scrieţi un program Pascal care calculează separat suma cifrelor pare şi impare ale numărului natural N. De exemplu: N=467970 Suma cifrelor impare este 22.Suma cifrelor pare este 10. 4. Scrieţi un program Pascal care determină care cifră trebuie scoasă, ca numărul rămas să fie minim. De exemplu: N=8469 cifra 8. 5. Scrieţiun program Pascal care formează numărul “invers” obţinut prin citirea numărului N de la stînga spre dreapta; De exemplu:N=4529 numărul invers:9254 6.Scrieţiun program Pascal care va determina faptul dacă numărul natural N este simetric față de mijlocul lui. De exemplu: N=34543 Da 7. Numărul este perfect dacă valoarea sa reprezintă cifrele de rang inferior al pătratului său. Alcătuiţi un program Pascal care determină dacă numărul natural N este perfect. De exemplu: N=25 Da 8. Formaţi din cifrele numărului natural N, numărul maxim posibil. De exemplu: N=1962 Numărul maxim posibil 9621 9. Determinați cifra de valoare minimă a numărului natural N, și ce ordin reprezintă: De exemplu: 12049 Cifra 0 reprezintă ordinul sutelor.
PROBLEME. TIPUL DE DATE ARRAY
1. Fie dat tabloul A[1..n], n£100,denumere reale. Scrieţi un program, care determină de câte ori figurează în acest tablou elementul cu valoare minimă. INTRARE: numărul n şi elementelor tabloului A se introduc dela tastatură. IEŞIRE: pe ecran se afişează într-o linie elementul cu valoare minimă şi numărul de apariţii ale acestuia, separate prin spaţiu 2. Fie dattabloul A[1..n], n£100, de numere naturale. Scrieţi un program, care calculează suma elementelor tabloului, valorile cărora sunt divizibile cu 3 sau cu 7. INTRARE: numărul n şi elementelor tabloului A se introduc dela tastatură. IEŞIRE: pe ecran se afişează suma elementelortabloului, valorile cărora sunt divizibile cu 3 sau cu 7. 3. Fie dattabloul A[1..n], n£100, de numereîntregi. Scrieţi un program, care determină cea mai lungă secvenţă de zerouri consecutive. INTRARE: numărul n şi elementelor tabloului A se introduc dela tastatură. IEŞIRE: pe ecran se afişează lungimeasecvenţei cerute. 4. Fie dat tabloulA[1..n], n£100, de numereîntregi. Scrieţi un program, care determină lungimea celei mai lungi secvenţe de elemente consecutive ordonate crescător. INTRARE: numărul n şi elementelor tabloului A se introduc dela tastatură. IEŞIRE: pe ecran se afişează lungimeasecvenţei maximale de elemente ordonate crescător. 5. Fie dattabloul A[1..n], n£100, de numereîntregi. Scrieţi un program, care efectuează deplasarea consecutivă spre stânga cu o poziţie a elementelor A[2], A[3],…,A[n]. Elementul cu indicele 1 al tabloului iniţial va fi plasat pe poziţia cu indicele n.INTRARE: numărul n şi elementelor tabloului A se introduc de la tastatură.IEŞIRE: pe ecran se afişează elementele tabloului modificat, separate prin spaţiu.
Observație. Selectați cîte o problemă de la tipul simplu de date și una de la tipul ARRAY. (numarul problemei în corespondență cu numărul din registru: pentru 1,6,11,15,21-problema 1, ș.a.m.d)
|
|
| |
Vani[k]a | Data: Duminică, 2014-05-18, 1:08 PM | Mesaj # 3 |
Soldat
Grup: Utilizatori
Mesaje: 3
Status: Offline
| Tipuri simple de date . problema 5 . Program InversNumar; var x,d,c,y : longint; begin write ('x=') ; readln(x); d:=x;y:=0; repeat c:=d mod 10 ; y:=y*10+c; d:=d div 10; until d=0; writeln('inversul numarului',x,'este',y); readln; end.
--------------------------------------------- tipuri simple de date . problema 7
program numarperfect; var n,i,s : integer ; begin write('n='); readln(n); s:=0; for i:=1 to n do if n mod i=0 then s:=s+i ;
if n=s-n then writeln ('numarul ',n, 'este perfect ') else writeln ('numarul',n, ' nu este perfect'); readln; end.
Mesajul a fost editat de către Vani[k]a - Duminică, 2014-05-18, 1:31 PM |
|
| |
ygory1 | Data: Luni, 2014-05-19, 0:01 AM | Mesaj # 4 |
Locotenent
Grup: Administratori
Mesaje: 37
Status: Offline
| Număr perfect - e corect.
Pentru numere perfecte: Pentru n=25 (în condiție e scris ca e perfect ) avem : delimităm prima cifra și obținem 5, iar 5 la pătrat e 25 - numărul inițial. La problema ta: pentru 25 s = 1+5+10+15+20+25=76 și 76-25 nu e 25 - rezultă că nu e perfect. Program greșit.
|
|
| |
principeceamb | Data: Duminică, 2014-11-23, 5:30 PM | Mesaj # 5 |
Soldat
Grup: Utilizatori
Mesaje: 4
Status: Offline
| Cum sa rezolvi probleme PASCAL? :(
|
|
| |
ygory1 | Data: Luni, 2014-11-24, 9:31 PM | Mesaj # 6 |
Locotenent
Grup: Administratori
Mesaje: 37
Status: Offline
| Pentru a rezolva o problemă este necesar: 1. în primul rînd să scrii această problemă (cu alte cuvinte s-o citești atent) 2. Apoi să găsești soluția matematică 3. Să creiezi un algoritm de rezolvare. 4. Să treci algoritmul în limbajul de programare.
|
|
| |
ygory1 | Data: Luni, 2014-11-24, 9:32 PM | Mesaj # 7 |
Locotenent
Grup: Administratori
Mesaje: 37
Status: Offline
| Scrie o problema si rezolvam impreuna.
|
|
| |
principeceamb | Data: Duminică, 2014-12-07, 10:37 PM | Mesaj # 8 |
Soldat
Grup: Utilizatori
Mesaje: 4
Status: Offline
| Cum pot rezolva problema data? 8. Formaţi din cifrele numărului natural N, numărul maxim posibil. De exemplu: N=1962 Numărul maxim posibil 9621
|
|
| |
ygory1 | Data: Duminică, 2014-12-14, 8:03 PM | Mesaj # 9 |
Locotenent
Grup: Administratori
Mesaje: 37
Status: Offline
| La problema aceasta se poate de descompus in trei probleme mai mici. 1. Descompunem numărul dat in cifre. 2. Ordonăm cifrele în ordine crescătoare. 3. formăm numărul din cifrele ordonate.
|
|
| |
ygory1 | Data: Duminică, 2014-12-14, 8:35 PM | Mesaj # 10 |
Locotenent
Grup: Administratori
Mesaje: 37
Status: Offline
| Probleme propuse la tema PRCEDURI 17. Se citesc vîrstele în ani ale mai multor persoane. Încercaţi să le aşezaţi la mese astfel încît persoanele de la aceeaşi masă să aibă aceeaşi vîrstă. Să se afişeze numărul de mese.
18. Problema presupune numărarea elementelor distincte dintr-un şir dat. Deoarece elementele sunt numere naturale din intervalul [0,150], reducem problema la construirea mulţimii vîrstelor respective şi apoi la calculul cardinalului ei.
Procedura DATE tratează într-o ,,anexă,, a programului segmentul de introducere a datelor. Funcţia CARD transmite programului principal numărul de elemente din mulţimea vîrstelor (V). Atît procedura cît şi funcţia sunt apelate o singură dată în program şi lucrează cu variabilele globale ale programului, deci se putea renunţa la ele transferîndu-se instricţiunile în programul principal care însă rămînea stufos şi greu de urmărit de către cineva neinteresat de toate amănuntele de programare.
19. Se citesc de la tastatură n (n£20) numereleîntregi foarte mari (de cel mult 999 de cifre). Să se afişeze suma lor. 20. Pentru a spori precizia de calcul, un programator trebuie să calculeze suma a nfracţii de numere întregi, efectuînd o singură împărţire reală. Cum procedează. Să se afişeze tabelul de semne al unei expresii raţionale de forma cu k,n £10 numere naturale şi ai, bi,ci, di numere reale date.
21. Se citesc de la tastatură trei perechi denumere (x, y) şi se cere să se scrie cea mai mare şi cea mai mică dintre valorile corespunzătoare ale funcţiei.Exemplu: pentru date (4, 2) (0.25, 0.64) şi(1, 0.25) obţinem f(4, 2) =0.75; f(0.25, 0.64)=1.3; f(1, 0.25)=1.25 şi se vor afişa valorile 1.25 şi 0.75.
|
|
| |
|
| |