Logare

Utilizator:
Parola:

Inregistrare

Ultimele noutăţi

Ziua porţilor deschise
..

Lucrarea de laborator nr.1
Inapoi la lista cursurilor

Scopul lucrДѓrii:

В· Argumentarea necesitДѓЕЈii structurДѓrii datelor.

В· RecunoaЕџterea Еџi utilizarea formulelor metalingvistice Еџi a diagramelor sintactice ale declaraЕЈiilor de tipuri de date Г®n studiu.

В· Prelucrarea datelor structurate.

В· Alegerea structurii de date, adecvate rezolvДѓrii unei

В 

Sarcina:

SДѓ se declare un vector bidimensional de mДѓrimea 5x5 cu component de tip Г®ntreg, sДѓ se introducДѓ valori de la tastaturДѓ, se va afiИ™a componentele vectorului И™i se va calcula conform variantei (nr. calculatorului):

  1. Suma elementelor pare
  2. Suma elementelor impare
  3. Suma elementelor pe diagonala principal
  4. Suma elementelor pe coloana 2
  5. Suma elementelor pe rindul 2
  6. Suma elementelor positive
  7. NumДѓrul elementelor positive
  8. NumДѓrul elementelor negative
  9. NumДѓrul elementelor pare
  10. NumДѓrul elementelor impare
  11. NumДѓrul elementelor = 10
  12. NumДѓrul elementelor divizibile cu 3.
  1. Suma elementelor pare
  2. Suma elementelor impare
  3. Suma elementelor pe diagonal principala
  4. Suma elementelor pe coloana 2
  5. Suma elementelor pe rindul 2
  6. Suma elementelor positive
  7. NumДѓrul elementelor positive
  8. NumДѓrul elementelor negative
  9. NumДѓrul elementelor pare
  10. NumДѓrul elementelor impare
  11. NumДѓrul elementelor = 10
  12. NumДѓrul elementelor divizibile cu 3.

В 

Programul exemplu:

Program Vector;

type Matrice=array[1..3, 1..4] of real;

var m : Matrice;

В В В  i, j : integer;В В В  s : real;

begin

В writeln('DaИ›i componentele m[i,j]:');

В for i:=1 to 3 do

В В  for j:=1 to 4 do

В В В В  begin

В В В В В В  write('m[', i, ',', j, ']=');

В В В В В В  readln(m[i,j]);

В В В В  end;

В writeln('AИ›i introdus:');

В for i:=1 to 3 do

В В  begin

В В В В  for j:=1 to 4 do

В В В В В В  write(m[i,j]);

В В В В  writeln;

В В  end;

s:=0;

В for i:=1 to 3 do

В В  for j:=1 to 4 do

В В В В  s:=s+m[i,j];

В writeln('Suma=', s);

readln;

end.

В 

Concluzie:

В 

lucrarea in format electronic <<>>

ComentariiReinoieste comentariile

Logare

Utilizator:
Parola:
Retine-ma
Inregistrare
Twitter   facebook facebook Mail.ru