дана последовательность из n целых чисел найти среднее арифметическое этой последовательности не использовать структуру данных массив

модификация лаб._№3 (цикл) под Assembler (реализовать управляющие конструкции программы в виде ассемблерных вставок). Программный код вставить в отчет. Составить блок-схему

#include <iostream>

using namespace std;

int main()

{

int a, b, c, i, sr;

b = 0;

cout << "Enter several numbers ";

cin >> c;

for (i = 0; i < c; i++) {

cout << "Enter the number: ";

cin >> a;

b += a;

}

sr = b / c;

cout << "The arithmetic average of the numbers = " << sr << '';

system("pause");

}

program zz1;

const n = 13; // задаем количество элементов в последовательности

R:array [1..n] of integer=( 26, -53, 0, -67, 12, -34, 0, 90, 14, -78, 0, -45, 66 ); // задаем последовательность чисел

var i, k, m:integer; // задаем переменные целого типа

begin

for i:=1 to n do // организуем цикл, в котором переберем все числа в последовательности

m:=m + R[i]; // добавляем элемент последовательности в сумму

writeln( ' среднее арифметическое значение чисел в последовательности = ', m/n); // выводим ответ

end.