LICEUL TEORETIC “GRIGORE MOISIL”,TULCEA

PROBLEME CU AFISARE IN

FISIER.MAXIM.MINIM

LEGATURA DINTRE SI GRIGORE MOISIL INFORMATICAGrigore Constantin Moisil (n. 10 ianuarie 1906, Tulcea - d. 21 mai 1973, Ottawa, Canada) a fost un matematician român, considerat părintele informaticii românești cu invenția de circuite electronice tristabile. Moisil a insistat și ajutat mult la realizarea primelor calculatoare românești. A avut contribuții remarcabile la dezvoltarea informaticii și la formarea primelor generații de informaticieni. A primit Computer Pioneer Award al societății IEEE, în 1996 (post-mortem).Viața sa dedicată matematicii și informaticii l-a consacrat ca un extraordinar om de știință și profesor.

Maximul in exercitii…

Printre numeroase tipuri de probleme,in limbajul Pascal din informatica se numara si problemele in care se cere maximul (si\sau minimul)fie dintr-un interval,fie dintre elementele indroduse de la tastatura.

Pentru rezolvarea problemelor de acest gen se foloseste un algoritm special,standard.

Se da un vector de n elemente.Sa se afiseze in fisierul date.out maximul si minimul dintre elemente.Se da un vector de n elemente.Sa se afiseze in fisierul date.out maximul si minimul dintre elemente.var f:text;var f:text; n,i,max,min:integer;n,i,max,min:integer; v:array [1..20]of integer;v:array [1..20]of integer;begin begin read(n);read(n);for i:=1 to n dofor i:=1 to n doread(v[i]);read(v[i]);assign(f,'date.out.text');assign(f,'date.out.text');rewrite (f);rewrite (f);max:=-MAXINT;max:=-MAXINT;min:=-MININT;min:=-MININT;for i:=1 to n dofor i:=1 to n do beginbegin if (v[i])>max thenif (v[i])>max then max:=v[i];max:=v[i]; if (v[i])<min thenif (v[i])<min then min:=v[i];min:=v[i]; end.end.write (f,'max=',max);write (f,'max=',max);write (f,'min=',min);write (f,'min=',min);close (f);close (f);end.end.

EASY/MEDIUM/HARDEASY/MEDIUM/HARD

Dupa cum se poate observa din problema anterioara,exercitiile cu maxim si minim pot varia in functie de complexitate .Se poate cere sa se lucreze cu date elementare dar si cu vectori,sau cu afisare in fisier.

Si asta nu e totul!!!Pot aparea tot felul de probleme ,de exemplu,cu distanta maxima dintre doi vectori…

• Se citeste n si sirul de valori reale x1,x2,..,xn ordonate crescator. Sa se determine distanta maxima între doua elemente consecutive din sir.

• Analiza problemei - elaborarea algoritmului :• - este o problema maxim• - distanta dintre primele valori consecutive din sir se noteaza cu max• - dupa care facem o comparatie cu urmatoarele distante dintre valori• - in momentul in care se intalneste o valoare mai mare decat max atunci

aceasta valoare va deveni noul max• - algoritmul se opreste in momentul in care se face comparatia dintre

max si distanta dintre ultimele doua valori ale sirului.

program dist_elem;var n,i:word; max:real; v:array[1..50] of real;BEGINwrite('n=');readln(n);for i:=1 to n do begin write(‘v[',i,']='); readln(v[i]); end;max:=v[2]-v[1];for i:=2 to n-1 do if v[i+1]-v[i]>max then max:=v[i+1]-v[i];writeln('max=',max:6:2);readln;END.

UN PROIECT REALIZAT DE:UN PROIECT REALIZAT DE:

GRIGORE GABRIELGRIGORE GABRIEL LASCU ANDREILASCU ANDREI

Prof. Coordonator: PARLITU RODICAPARLITU RODICA