Паскаль среднее арифметическое кубов двух данных чисел

Задачи по Pascal. Вычислить среднее арифметическое кубов двух чисел и среднее геометрическое их модулей.

Условие задачи: Вычислить среднее арифметическое кубов двух чисел и среднее геометрическое их модулей (Язык Pascal).

Сложность: легкая.

Решение задачи

Для начала продумаем наше решение. Оно ну очень простое. Введем числа, потом просто подставим их в формулу среднего арифметического и среднего геометрического и всё)

Для того чтобы решить задачу нам понадобятся следующее переменные :

  • Переменные num1 и num2 — для наших двух чисел
  • Переменная sredA — для среднего арифметического
  • Переменная sredG — для среднего геометрического

    Начнем мы с каркаса нашей программы

    num1 , num2, sredA, sredG :
    real
    ;
    begin

    write
    (
    ‘Введите 1-ое число : ‘
    );readln(num1);

    write
    (
    ‘Введите 2-ое число : ‘
    );readln(num2);
    end
    .

    Тут мы объявили переменные и попросили пользователя ввести значения. Теперь стоит сказать как находятся среднее арифметическое и геометрическое.

    1. Среднее арифм. — это сумма всех чисел деленная на кол-во чисел, т.е. в нашем случае два числа, значит будет (num1+num2)/2

    2. Среднее геометр. — это корень из произведения всех чисел, т.е. надо умножить все числа и извлечь корень.

    И так сначала давайте для среднего арифметического :

    Тут всё просто. Дальше для среднего геометрического, в условии сказано что там модуль чисел, поэтому :

    sredG := Sqrt(
    abs
    (num1)*
    abs
    (num2));

    Вот и всё. Осталось только вывести результаты.

    Всё решение задачи Pascal

    num1 , num2, sredA, sredG :
    real
    ;
    begin

    clrscr;
    // очищаем экран. если используете программу Delphi удалите эту строку.

    write
    (
    ‘Введите 1-ое число : ‘
    );readln(num1);
    // вводим

    write
    (
    ‘Введите 2-ое число : ‘
    );readln(num2);
    // значения

    sredA := (num1+num2) /
    2
    ;
    // ищем среднее арифметическое

    sredG := Sqrt(
    abs
    (num1)*
    abs
    (num2));
    // ищем среднее геометрическое

    Источник

    Задачи по Pascal. Вычислить среднее арифметическое кубов двух чисел и среднее геометрическое их модулей.

    Условие задачи: Вычислить среднее арифметическое кубов двух чисел и среднее геометрическое их модулей (Язык Pascal).

    Сложность: легкая.

    Решение задачи

    Для начала продумаем наше решение. Оно ну очень простое. Введем числа, потом просто подставим их в формулу среднего арифметического и среднего геометрического и всё)

    Для того чтобы решить задачу нам понадобятся следующее переменные :

    1. Переменные num1 и num2 — для наших двух чисел
    2. Переменная sredA — для среднего арифметического
    3. Переменная sredG — для среднего геометрического

    Начнем мы с каркаса нашей программы

    Тут мы объявили переменные и попросили пользователя ввести значения. Теперь стоит сказать как находятся среднее арифметическое и геометрическое.

    1. Среднее арифм. — это сумма всех чисел деленная на кол-во чисел, т.е. в нашем случае два числа, значит будет (num1+num2)/2

    2. Среднее геометр. — это корень из произведения всех чисел, т.е. надо умножить все числа и извлечь корень.

    И так сначала давайте для среднего арифметического :

    Тут всё просто. Дальше для среднего геометрического, в условии сказано что там модуль чисел, поэтому :

    Вот и всё. Осталось только вывести результаты.

    Источник

    Среднее геометрическое модулей двух данных чисел

    wikiHow работает по принципу вики, а это значит, что многие наши статьи написаны несколькими авторами. При создании этой статьи над ее редактированием и улучшением работали, в том числе анонимно, 29 человек(а).

    Количество источников, использованных в этой статье: 5. Вы найдете их список внизу страницы.

    Среднее геометрическое — математическая величина, которую легко спутать с более часто применяемым средним арифметическим. Для вычисления среднего геометрического следуйте методам, приведенным ниже.

    Что ты хочешь узнать?

    Ответ

    Проверено экспертом

    PascalABC.NET 3.4.2, сборка 1861 от 09.11.2018

    Внимание! Если программа не работает, обновите версию!

    var (a, b) := ReadReal2(‘Введите два числа:’);

    Println(‘Ср.арифметическое’, (a + b) / 2);

    Println(‘Ср.геометрическое модулей’, Sqrt(Abs(a * b)));

    Введите два числа: -56.32 138

    Ср.арифметическое 40.84

    Ср.геометрическое модулей 88.1598548093178

    Ответ

    a:=random(50); // Если нужно вводить своё число, то тогда «a:= *заданное число*» или, иначе, readln(a) «

    writeln(‘Число «a» приняло значение ‘, a); // Если будет один из двух способов, показанных выше, то эта строка не является обязательной.

    b:=random(100); // Если нужно вводить своё число, то тогда «b:= *заданное число*» или, иначе, readln(b) «

    writeln(‘Число «b» приняло значение ‘, b); // Если будет один из двух способов выше, то эта строка не является обязательной.

    writeln(‘Среднее арифметическое данных двух чисел ‘, c);

    writeln(‘Среднее геометрическое данных чисел ‘, d);

    Условие задачи : Вычислить среднее арифметическое кубов двух чисел и среднее геометрическое их модулей (Язык Pascal).

    Сложность : легкая .

    Для начала продумаем наше решение. Оно ну очень простое. Введем числа, потом просто подставим их в формулу среднего арифметического и среднего геометрического и всё)

    Для того чтобы решить задачу нам понадобятся следующее переменные :

    1. Переменные num1 и num2 — для наших двух чисел
    2. Переменная sredA — для среднего арифметического
    3. Переменная sredG — для среднего геометрического

    Начнем мы с каркаса нашей программы :

    Тут мы объявили переменные и попросили пользователя ввести значения. Теперь стоит сказать как находятся среднее арифметическое и геометрическое.

    1. Среднее арифм. — это сумма всех чисел деленная на кол-во чисел, т.е. в нашем случае два числа, значит будет (num1+num2)/2

    2. Среднее геометр. — это корень из произведения всех чисел, т.е. надо умножить все числа и извлечь корень.

    И так сначала давайте для среднего арифметического :

    Тут всё просто. Дальше для среднего геометрического, в условии сказано что там модуль чисел, поэтому :

    Вот и всё. Осталось только вывести результаты.

    Источник

    Задачи по Pascal. Вычислить среднее арифметическое кубов двух чисел и среднее геометрическое их модулей.

    Условие задачи: Вычислить среднее арифметическое кубов двух чисел и среднее геометрическое их модулей (Язык Pascal).

    Сложность: легкая.

    Решение задачи

    Для начала продумаем наше решение. Оно ну очень простое. Введем числа, потом просто подставим их в формулу среднего арифметического и среднего геометрического и всё)

    Для того чтобы решить задачу нам понадобятся следующее переменные :

    Начнем мы с каркаса нашей программы

    uses
    crt;
    var

    num1 , num2, sredA, sredG :
    real
    ;
    begin

    write
    (
    ‘Введите 1-ое число : ‘
    );readln(num1);

    write
    (
    ‘Введите 2-ое число : ‘
    );readln(num2);
    end
    .

    Тут мы объявили переменные и попросили пользователя ввести значения. Теперь стоит сказать как находятся среднее арифметическое и геометрическое.

    1. Среднее арифм. — это сумма всех чисел деленная на кол-во чисел, т.е. в нашем случае два числа, значит будет (num1+num2)/2

    2. Среднее геометр. — это корень из произведения всех чисел, т.е. надо умножить все числа и извлечь корень.

    И так сначала давайте для среднего арифметического :

    Тут всё просто. Дальше для среднего геометрического, в условии сказано что там модуль чисел, поэтому :

    Вот и всё. Осталось только вывести результаты.

    Источник

  • Оцените статью
    Юридический портал
    Adblock
    detector