Question

Напишите пожалуйста программу на Pascal ABC Net, суть которой заключается в том, что человек должен написать ввести N чисел, после чего программа должна посчитать среднее арифметическое, которое округлено до целых чисел (round) и это среднее арифметическое должно быть умножено на самое маленькое число, введенное человеком и из всего этого вычитаем самое большое число, введённое человеком. Формула: , где t - это сумма введённых чисел, человеком, d-это количество чисел, введённых человеком, min-самое маленькое число, которое было введено человеком и max-это самое максимальное число, которое было введено человеком!! ЕСЛИ В РЕЗУЛЬТАТ ПО ЭТОЙ ФОРМУЛЕ ПОЛУЧАЕТСЯ ОТРИЦАТЕЛЬНЫЙ, ТО МЫ УМНОЖАЕМ ЕГО НА -1

Answer 1

Держи, вроде так, между 15 и 16 строкой собственно говоря и вводятся числа!

Answer 2

Program in PascalABC.NET for Calculating Arithmetic Mean, Multiplying by the Smallest Number, and Subtracting the Largest Number

Here's a program in PascalABC.NET that prompts the user to input N numbers, calculates the arithmetic mean, rounds it to the nearest integer, multiplies it by the smallest number, and then subtracts the largest number.

program ArithmeticMean;
var
  N, i, num, sum, min, max: integer;
  mean: real;
begin
  write('Enter the value of N: ');
  readln(N);
  
  sum := 0;
  min := 10000; // Initializing min with a large value
  max := -10000; // Initializing max with a small value
  
  for i := 1 to N do
  begin
    write('Enter number ', i, ': ');
    readln(num);
    sum := sum + num;
    
    if num < min then
      min := num;
    
    if num > max then
      max := num;
  end;
  
  mean := sum / N;
  mean := round(mean);
  mean := mean * min - max;
  
  writeln('The result is: ', mean);
end.

This program first prompts the user to input the value of N, then it iterates N times to take input of N numbers. It calculates the sum, finds the minimum and maximum numbers, calculates the arithmetic mean, rounds it to the nearest integer, multiplies it by the smallest number, and subtracts the largest number to get the result.

Note: The program assumes that the user will input integer numbers.

Let me know if you need further assistance!