Написать программу (в паскале) , которая вводит с клавиатуры 5 дробных чисел и вычисляет их среднее арифметическое. рекомендуемый вид экрана во время работы программы ниже. данные, введенные пользователем выделены полужирным шрифтом. вычисление среднего арифметического последовательности дробных чисел. после ввода каждого числа нажимайте . -> 5.4 -> 7.8 -> 3.0 -> 1.5 -> 2.3 среднее арифмитическое введенной последовательности: 4. 00 для завершения работы программы нажмите < enter> .

var i: integer;

var a   : array[1..5] of real;

begin

for i in [1..5] do

    begin

    write('-> ');

    readln(a[i]);

end;

writeln((a[1]+a[2]+a[3]+a[4]+a[5])/5: 0: 2);

end.

program dgh;

var

a,b: real;

i: integer;

begin

b: =0;

for i: =1 to 5 do

begin

write ('-> '); readln (a);

b: =b+a;

end;

write('среднее арифметическое введенной последовательности: ');

write (b/5: 0: 2);

readln;

end.

program summa;

var s, a, b, c : word;

begin

            write('введите a - > '); readln(a);

            write('введите b - > '); readln(b);

            write('введите с - > '); readln(c);

            s: =a+b+c;

            write(' сумма равна ',s);

            readln

end.

первый файл займет 2750/1054 =2,6 = 3 кластера(может быть только целое число кластеров).

второй файл займет 324000/1024 = 307,4 = 308 кластеров.

ответ: 3 + 308 кластеров