Объяснить, что означает каждая строчка:

 

Program sum_mas;

uses Crt;

Var i: integer;

sum:real;

M:array[1..5] of Real;

begin

WriteLn('Введите число m[',i,']=');

readln(m[i]);

end;

Sum:=0;

For i:=1 to 5 do

Sum:=sum+m[i];

Writeln('сумма =',sum);

readln;

end.

 

Program sum_mas;-имя программыuses Crt;-вывод в виде сообщ.Var i: integer;-описание переменныхsum:real;-описание переменныхM:array[1..5] of Real;описание массива и его размерbegin-начало программыWriteLn('Введите число m[',i,']=');-ввод массиваreadln(m[i]);чтение массиваend;-конец Sum:=0;-сумма=0For i:=1 to 5 do-цикл от 1 до 5Sum:=sum+m[i];-сумма = сумма + массивWriteln('сумма =',sum);-вывод суммыreadln;-чтение просто , что бы курсор переходил на другую строкуend.-конец всей программы

1. название программы

2. подключение библиотеки

3 и 4. объявление переменных и их типов

5. объявление массива

6. начало программы

7. вывод на экран сообщения о необходимом действии

8. считывание введенных с клавиатуры данных

9. конец ввода массива

10. обнуление переменной

11. начало цикла

12. формула подсчета переменной

13. вывод получившегося числа на экран

14. задержка экрана (чтобы увидеть результат)

15. конец программы