Question

Найти среднее арифметическое n-чисел ,вводимых с клавиатуры. помогите пожалуйста))) надо в паскале сделать)

Answer 1

 

если в паскале то

 

 

var

n, i, sum, k : integer;

begin

read (n);

for i := 1 to n do

begin

read (k);

if k mod 15 = 0 then sum := sum + k;

end;

writeln (sum / n);

end.

 

Answer 2

Для нахождения среднего арифметического n чисел, введенных с клавиатуры, вам потребуется использовать цикл, чтобы получить все числа от пользователя и сохранить их в переменных. Затем вы сможете вычислить сумму этих чисел и разделить ее на количество чисел (n), чтобы получить среднее арифметическое.

Вот пример кода на языке Pascal, который решает вашу задачу:

program AverageCalculator;
var
  n, i, number: integer;
  sum, average: real;
begin
  sum := 0;
  
  writeln('Введите количество чисел:');
  readln(n);
  
  writeln('Введите ', n, ' чисел:');
  for i := 1 to n do
  begin
    readln(number);
    sum := sum + number;
  end;
  
  average := sum / n;
  
  writeln('Среднее арифметическое:', average:0:2);
  
  readln;
end.

В этом коде мы объявляем переменные `n`, `i`, `number`, `sum` и `average`. Переменная `n` хранит количество чисел, которые пользователь хочет ввести. Переменная `i` используется для итерации в цикле `for`. Переменная `number` используется для временного хранения чисел, вводимых пользователем. Переменная `sum` хранит сумму всех чисел, а переменная `average` хранит среднее арифметическое.

Сначала мы запрашиваем у пользователя количество чисел, которые он хочет ввести. Затем мы используем цикл `for` для получения всех чисел от пользователя и добавления их к сумме. После завершения цикла мы делим сумму на количество чисел, чтобы получить среднее арифметическое, и выводим его на экран.

Надеюсь, это поможет вам решить вашу задачу!