Код программы прикреплен в файле.
В коде присутствуют три функции:
getLengthBeweenPoints - расчет расстояния между двумя точками на плоскости по формулеgetAreaOfTriangle - расчет площади треугольника по трем сторонамmain - ввод координат двух координат для каждой из вершин треугольника и вывод на экран расчитаной площади треугольниказа отметку "лучший ответ" и нажатую кнопочку " ":
На этом ответеВ моем аккаунтеP.S.
К сожалению сайт не позволяет загружать текстовые форматы (знаю, это тупо), по этому файл называется 'main.c.pdf', просто переименуйте его и уберите из названия '.pdf', должно получиться 'main.c', далее можете открыть любым текстовым редактором либо скомпилировать в бинарник за комментарий: на Паскале НЕ надо! Прям от души, просто надоели люди знающие только паскаль и пишущие исключительно на нем ответы, хотя людям такое и не надо...На всякий случай в коментариях продублирую код.
const n=10;
var a,b:array[1..n] of integer;
c:array[1..2*n] of integer;
i,n2:integer;
begin
Randomize;
writeln('a:');
for i:=1 to n do begin
a[i]:=random(21);
write(a[i]:3);
end;
writeln;
writeln('b:');
for i:=1 to n do begin
b[i]:=random(21);
write(b[i]:3);
end;
writeln;
n2:=n div 2;
for i:=1 to n2 do c[i]:=b[i];
for i:=1 to n do c[i+n2]:=a[i];
for i:=n2+1 to n do c[n+i]:=b[i];
writeln('c:');
for i:=1 to 2*n do write(c[i]:3);
end.
Пример:
a:
3 12 10 16 13 12 9 18 2 0
b:
6 1 12 6 2 14 8 10 20 11
c:
6 1 12 6 2 3 12 10 16 13 12 9 18 2 0 14 8 10 20 11