Дана последовательность из n действительных чисел .Написать программу для подсчета суммы этих чисел.
Исходные данные n=5
2,3;0;2,5;1,7;-1,5.
напишите пожалуйста на английском.

beginvar sum,i: integer;sum:=0;  var a: array [1..5] of integer := (1,5,12,15,47);  for i:=1 to 5 do begin  sum:=sum+a[i];  end;  writeln('Sum = ',sum);end.