Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Question!


Name: rjs
Title:
  srjtj
Question:
program xxx;
studio:var array[1..31] of integer;
i,somma,somma2:interger;

procedure calcolototale;
begin
somma:=0;
for i := 1 to 31 do
somma:=somma studio[1];
emd;
procedure calcolo settimanale;
begin
somma2.=0
for i := 8 to 14 do
somma2:=somma studio[1]
end;
procedure calcolomax;
var
T:array[0..4] of integer;
j,max,posizionemax:integer;
begin
for i:=0 to 4 do
T[1]:=0;
for i:= 1 to 31 do
begin
fo i:= o to 4 do
begin
if (studio[i]=j) then
t[j]:=

Answers: