Есть ответ 👍

Переписать код с Pascal на C# (Можно также на С++, но очень желательно на C#)

function square(x1, y1, x2, y2, x3, y3: integer):real;
var
a1, a2, a3, p: real;
begin
a1:= sqrt(sqr(x2-x1) + sqr(y2-y1));
a2:= sqrt(sqr(x3-x2) + sqr(y3-y2));
a3:= sqrt(sqr(x1-x3) + sqr(y1-y3));
p:= (a1 + a2 + a3) / 2;
square:= sqrt(p * (p-a1) * (p-a2) * (p-a3));
end;

const
n = 20;
var
x, y: array[1..n] of integer;
temp,res: real;
i: integer;
begin
randomize;
for i:= 1 to n do
begin
x[i]:= random(20) - 10;
y[i]:= random(20) - 10;
end;
res:=0;
for i:= 3 to n do
begin
writeln(' Координаты треугольника', i-2, ': ', x[1]:4, y[1]:4, x[2]:4, y[2]:4, x[i]:4, y[i]:4);
temp:= square(x[1], y[1], x[2], y[2], x[i], y[i]);
res:=res+temp;
writeln('Площадь треугольника ', i-2, ' = ', temp:10:2);
writeln;
end;
writeln('Общая площадь равна: ',res);
readln;

end.

105
137
Посмотреть ответы 1

Ответы на вопрос:


If i=j then s: =s+a[i,j];

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS