Решение домашних заданий

Ввести c клавиатуры массив из 5 элементов, найти среднее арифметическое всех элементов массива. Пример: Введите пять чисел: 4 15 3 10 14 ср

1 января 0001 / Информатика / Комментарии: 0

Ввести c клавиатуры массив из 5 элементов, найти среднее арифметическое всех элементов массива.

    Пример:

 Введите пять чисел:

 4   15   3  10    14

 среднее арифметическое 9.200

  • Uses crt;
    var a:array[1..5] of integer; i:integer; s:real;
    begin
      s:=0;
      writeln(‘Введите пять чисел:’);
      for i:=1 to 5 do
      begin
        read(a[i]);
        s:=s+a[i];
      end;
      s:=s/5;
      writeln;
      write(‘среднее арифметическое ‘,s);
    end.

Добавить комментарий