I need to get the sum of the ages.
Program Aula11_Exc01; Var idade:Array[1..5] of Integer; soma, i:Integer; Begin For i:= 1 To 5 Do Begin Writeln('Enter the age...',i); Readln(idade[i]); End; soma:= i + soma; Writeln('The sum of the ages is ',soma); Readln; End.
can anyone help me?
thank you!