Question

Перевести с Языка PASCAL в С++ uses crt; var a,b,c,ma,mb,mc: real; function Mediana (x,y,z: real): real; var m: real; begin m:=0.5*((2*sqr(y))+(2*sqr(z))-sqr(x)); Mediana:=m; end; begin write('a='); readln(a); write('b='); readln(b); write('c='); readln(c); writeln('Медиана к стороне А =', Mediana (a,b,c):0:1); writeln('Медиана к стороне B =', Mediana (b,c,a):0:1); writeln('Медиана к стороне C =', Mediana (c,a,b):0:1); readkey end.

Answer 1

Код программы:

#include <iostream>

#include <locale>

using namespace std;

double Mediana(double x, double y, double z) {

double m;

m = 0.5*(2 * y*y + 2 * z*z - x*x);

return m;

}

int main()

{

setlocale(LC_ALL, "Russian");

double a, b, c, ma, mb, mc;

cout << "a = ";

cin >> a;

cout << "b = ";

cin >> b;

cout << "c = ";

cin >> c;

cout<<"Медиана к стороне А = "<< Mediana(a, b, c)<<endl;

cout <<"Медиана к стороне B = "<< Mediana(b, c, a)<<endl;

cout <<"Медиана к стороне C = "<< Mediana(c, a, b)<<endl;

return 0;

}

Answer 2

Вот перевод данной программы на язык C++:

cppCopy code
#include <iostream>
#include <cmath>
using namespace std;

double Mediana(double x, double y, double z) {
    double m = 0.5 * ((2 * pow(y, 2)) + (2 * pow(z, 2)) - pow(x, 2));
    return m;
}

int main() {
    double a, b, c;
    cout << "a=";
    cin >> a;
    cout << "b=";
    cin >> b;
    cout << "c=";
    cin >> c;

    cout << "Медиана к стороне A =" << Mediana(a, b, c) << endl;
    cout << "Медиана к стороне B =" << Mediana(b, c, a) << endl;
    cout << "Медиана к стороне C =" << Mediana(c, a, b) << endl;

    return 0;
}

Этот код переводит вашу программу на C++. Он использует библиотеку iostream для ввода и вывода данных, а также функцию pow из библиотеки cmath для возведения в степень. Функция Mediana и остальная часть кода остаются практически без изменений.