В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
ibarabol318
ibarabol318
08.04.2022 15:04 •  Информатика

Перевести с Языка 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.

Показать ответ
Ответ:
Anya183930303
Anya183930303
12.02.2021 22:14

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

#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;

}

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота