Задать вопрос
2 июля, 18:24

Дано два целых числа x и y. Составить программу печатающую среднее арифметическое кубов этих чисел, а также определить на сколько исходные числа отличаются от найденного значения.

+5
Ответы (1)
  1. 2 июля, 22:21
    0
    Program srednee;

    var

    x, y: integer;

    sredn: real;

    begin

    write ('x = ') ; readln (x) ;

    write (' y = ') ; readln (y) ;

    sredn : = (power (x, 3) + power (y, 3)) / 2;

    writeln ('Srednee arifmeticheskoe = ', sredn) ;

    writeln ('X otlichayetsya na ', abs (sredn-x)) ;

    writeln ('Y otlichayetsya na ', abs (sredn-y)) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Дано два целых числа x и y. Составить программу печатающую среднее арифметическое кубов этих чисел, а также определить на сколько исходные ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы