👤

type Zi = (L, Ma, Mi, J, Vi, S, D) ;
Venit = array [Zi] of real;
var v: Vector;

Componentele variabilei v reprezintă venitul zilnic al
unei întreprinderi. Elaborați un program care va
calcula venitul saptămînal al întreprinderii.

Algoritmul programului
Vom defini, în partea declarativă, un tablou cu 7
elemente de tip real.
Vom introduce datele pentru fiecare zi.
Vom calcula suma tuturor elementelor ale acestui tablou.
Vom afișa suma saptămînal calculată.


Răspuns :

var

 N: array [1..100] of integer;

 c, s: integer;

begin

 s := 0;

 for c := 1 to 7 do

   read(N[c]);

 for c := 1 to 7 do  

   s :=  s+N[c];

 writeln(s);

 readln;

end.

Vă mulțumim pentru vizita pe site-ul nostru dedicat Informatică. Sperăm că informațiile furnizate v-au fost utile. Dacă aveți întrebări suplimentare sau aveți nevoie de ajutor, nu ezitați să ne contactați. Vă așteptăm cu drag și data viitoare! Nu uitați să adăugați site-ul nostru la favorite!


Ze Learnings: Alte intrebari