PITICII PROGRAMATORI

Funcţia random şi procedura randomize 1) Să se simuleze aruncarea unui zar de n ori afişându-se valoarea feţei şi să se afişeze de câte ori a apărut valoarea 6. 2) Se aruncă 2 zaruri până la obţinerea unei duble. Să se afişeze suma punctelor. 3) Se extrag n bile dintr-o urnă, notate de la 1 la 20. Valoarea bilei va fi generată de calculator. Să se afişeze cea mai mare valoare extrasă. 4) Dintr-o urnă cu bile albe şi negre se extrage pe rând câte o bilă, de n ori. Afişaţi câte bile albe şi câte negre au fost extrase. 5) Să se facă un test de înmulţire cu două numere cuprinse între 0 şi 10, generate de calculator, care să cuprindă cel mult 5 încercări.

Probleme diverse 1) Să se afişeze toate numerele până la 100 care au patru divizori. 2) Dintre numerele mai mici ca 1000, care au cei mai mulţi divizori ? 3) Se dau n numere. În câte zerouri se va termina produsul lor? Exemplu : date de intrare n=4 5 4 10 25 date de ieşire 3 zerouri. 4) Se dă un număr natural n, n 5) Se introduc temperaturile medii măsurate în fiecare lună a unui an. Să se afişeze valoarea celei mai mari temperaturi negative şi a celei mai mici temperaturi pozitive a acelui an. Exemplu: date de intrare -4 -6 0 5 10 20 24 25 17 8 -1 -7 date de ieşire max negative=-1 min pozitive=5. 6) Se citeşte un număr natural n cu cel mult 9 cifre şi se cere să se afişeze o piramidă formată din cifrele lui astfel: pe prima linie cifra (sau cifrele) din mijloc, pe a doua cele 3 (sau 4 ) cifre din mijloc, etc. pe ultima să fie scris numărul dat. Exemplu: n=237855 se va afişa 7 8 3 7 8 5 2 3 7 8 5 5...

Algoritmi de însumare, contorizare, determinare a min şi max 1) Se citesc pe rând 4 numere întregi. Să se numere câte dintre ele au restul 7 la împărţirea cu 13. Să se afişeze aceste numere şi produsul celorlalte numere. Exemplu: Date de intrare 20 15 30 46 Date de ieşire Numere: 20 46 Total: 2 Produs: 450. 2) Se citesc pe rând temperaturile medii ale fiecărei luni a unui an, ca numere întregi. Să se afişeze cu două zecimale media anuală a temperaturilor pozitive şi a celor negative. Exemplu: Date de intrare -5 -3 1 8 12 17 20 21 18 10 6 -2 Date de ieşire medie_poz=13.66 medie_neg=-3.33. 3) Se citesc numere naturale strict pozitive până la întâlnirea numărului 0. Să se numere câte dintre ele sunt pare, presupunând că cel puţin primul element este nenul. Exemplu: Date de intrare 4 3 6 5 7 7 0 Date de ieşire 2 numere pare. 4) Se introduc datele de naştere a n copii, sub forma an, număr lună, zi. Să se afişeze câţi copii sunt născuţi pe 1 iunie şi câţi co...

Operatori logici 1) Se dau trei numere diferite. Să se afişeze cel mai mare şi cel mai mic. Exemplu : Date de intrare 45 34 78 Date de ieşire max=78 min=34. 2) Se dau trei numere diferite. Afisaţi-le în ordine crescătoare. Exemplu : Date de intrare 4 2 6 Date de ieţire 2 4 6. 3) Se dau trei numere diferite. Afişaţi numărul a cărei valoare este cuprinsă între valorile celorlalte două. Exemplu : Date de intrare 12 14 10 Date de ieşire 12. 4) Se introduc trei date de forma număr curent elev, punctaj. Afişaţi numărul elevului cu cel mai mare punctaj. Exemplu : Date de intrare nr crt 7 punctaj 120 nr crt 3 punctaj 100 nr crt 4 punctaj 119 Date de ieşire punctaj maxim are elevul cu nr crt 7. 5) Se introduc trei numere. Să se verifice dacă formează o secvenţă de numere consecutive. Exemple: Date de intrare 3 4 5 Date de ieşire Da Date de intrare 4 5 7 Date de ieşire Nu. 6) La ora de matematică Gigel este scos la tablă. Profesoara îi dictează trei numere ...

1. Să se scrie un algoritm care citeşte un număr natural şi dacă acesta este 0 atunci citeşte două numere întregi a şi b şi tipăreşte suma lor, iar dacă nu este nul citeşte alte două numere reale c şi d şi tipăreşte produsul lor. 2. Stabiliţi dacă un număr întreg dat este par sau impar. 3. Se citesc trei numere reale. Să se verifice valabilitatea afirmaţiei: „unul dintre ele este egal cu suma celorlalte două”.

1. Se citesc două valori întregi a şi b. Să se tipărească valoarea cea mai mică. 2. Se citesc două valori întregi a şi b. Să se interschimbe conţinutul lor folosind o variabilă auxiliară (temporară). 3. Se citesc două valori întregi a şi b. Să se interschimbe conţinutul lor fără a folosi o variabilă auxiliară (temporară). 4. Se citesc două valori întregi a şi b. Tipăriţi media lor aritmetică. 5. Se citeşte un număr întreg format din exact 3 cifre. Tipăriţi suma cifrelor sale. 6. Se citesc trei numere reale. Tipăriţi suma dintre cele trei numere, produsul celui de al doilea cu cel de al treilea precum şi suma dintre primul şi al treilea număr.

INSTRUCŢIUNILE DE BAZĂ ALE LIMBAJULUI PASCAL Limbajul PASCAL a fost conceput special pentru scrierea programelor structurate. Limbajul are o sintaxă riguroasă (totuşi, uneori, rigidă) şi mari posibilităţi de extindere a tipurilor de date. INSTRUCŢIUNEA VIDĂ  nu execută nimic, dar există cazuri în care avem nevoie de ea;  dacă apare simbolul ';' în faţa cuvântului 'END' avem o instrucţiune vidă; ex: un anumit rezultat întreg r dorim să îl corectăm după următoarea regulă: "DACĂ r>0 şi impar ATUNCI r:= r+1 ALTFEL r:= r-1; SF_DACĂ" {ODD este o funcţie booleană care stabileşte dacă un număr este par sau impar. Această determinare se poate face şi astfel: r mod 2 = 0 pentru. numere pare sau r mod 2 0 pentru. numere impare.} Secvenţă greşită Secvenţă corectă IF r>0 THEN IF ODD(r) THEN r:= r+1 ELSE r:= r-1; Este interpretată: IF r>0 THEN IF ODD(r) THEN r:= r+1 ELSE r:= r-1; IF r>0 THEN IF ODD(r) THEN r:= r+1 ...

31. Se citesc două valori întregi a şi b. Tipăriţi media lor aritmetică. program pd31;{media aritmetica a doua valori} var a,b:integer; begin write('a=');readln(a); write('b=');readln(b); writeln('media aritmetica a celor doua valori este ma= ',(a+b)/2:4:2); readln; end.