Составтье программу, средний по контрольной работе из 10 человек. отметки учащихся вводится с клавиатуры. сделайте.

решение на pascal:

var

    i, sum, k, x : integer;

    ans : real;

begin

    sum : = 0;

    k : = 0;

    for i : = 1 to 10 do begin

        read(x);

        sum : = sum + x;

        k : = k + 1;

    end;

    ans : = sum / k;

    writeln(ans);

end.

ответ:

так как язык не указан, предлагаю решения на 2х языках - python и c#

python:

def main():

marks = list(map(int,

assert len(marks) == 10

return sum(marks)/10

if __name__ == '__main__':

print(

c#

using system;

namespace global

{

    class app

    {

        int[] marks = new int[10];

        double summ = 0;

        static void main(string[] argv)

        {

            app obj = new app();

            obj.run();

        }

        public void run()

        {

            for(int i = 0; i < 10; i++)

            {

                marks[i] = convert.toint32(console.;

            }

            for (int i = 0; i< 10; i++)

            {

                summ = summ + marks[i];

            }

            console.writeline(summ / 10);

            console.readkey();

        }    

    }

}

объяснение:

на случай проблем с копированием кода оставляю ссылки на исходный код на сервисе pastebin.com:

python:

c#:

обе программы протестированы и полностью выполняют поставленную