Нужно составить программу вычисления площади треугольника

@АннаАртемова · Регистрация: 29.05.2016

Author24 — интернет-сервис помощи студентам

Люди добрые! Помогите составить программу в Паскале.
Условие:
Треугольник АВС задан координатами своих величин А (Х1, Y1), В (Х2, Y2), С (Х3, Y3). Точка G делит отрезок АВ в отношении 3:1. Точка М является точкой пересечения медиан. Составить программу вычисления площади треугольника GМВ. Исходные данные: А (2; 4), В (14; 9), С (16; -2).

Добавлено через 41 минуту
Составила следующую программу:

Pascal

var
x1, y1, x2, y2, x3, y3, x4, y4, x5, y5, A, B, C, M, G: integer;
s, GB, BM, MG: real;
begin
writeln ('Введите координаты вершины А');
readln (x1, y1);
writeln ('Введите координаты вершины В');
readln (x2, y2);
writeln ('Введите координаты вершины C');
readln (x3, y3);
writeln ('Введите координаты вершины G');
readln (x4, y4);
writeln ('Введите координаты вершины M');
readln (x5, y5);
writeln ('Координаты вершины А (',x1,',',y1,')');
writeln ('Координаты вершины B (',x2,',',y2,')');
writeln ('Координаты вершины C (',x3,',',y3,')');
writeln ('Координаты вершины G (',x4,',',y4,')');
writeln ('Координаты вершины M (',x5,',',y5,')');
GB:=sqrt(sqr(x4-x2)+sqr(y4-y2));
BM:=sqrt(sqr(x5-x4)+sqr(y5-y4));
MG:=sqrt(sqr(x5-x2)+sqr(y5-y2));
writeln('Стороны треугольника GB=',GB,' cm, BM=',BM,' cm и MG=',MG,' cm');
s:=sqrt(GB*BM*MG);
writeln('Площадь треугольника ',s:2:2);
readln
end.

Нажимаю F9. Просят ввести координаты точки А. Ввожу. Выдает ошибки:
Переменная А нигде не используется
Переменная В нигде не используется
Переменная С нигде не используется
Переменная G нигде не используется
Переменная М нигде не используется.
Умом я понимаю, что переменные А и С действительно нигде не используются, а координат точек G и М у меня нет. Как написать программу?

@WindAndRain · 31.05.2016, 01:53

1. Сообщения типа "Переменная А нигде не используется" - не ошибки, а предупреждения. На них нужно обращать внимание, но они не всегда означают, что код не работает.
2. Зачем ты просишь ввести координаты точек M и G? По условию задачи с клавиатуры вводятся только координаты точек A, B, C. M и G - видимо, должны рассчитываться на основе координат вершин.
3. Просто удали объявления переменных A, B, C, M, G - ты их действительно нигде не используешь и на работу программы они никак не влияют: ведь координаты точек ты сразу считываешь в переменные x, y.

@WindAndRain 93 / 11 / 23 Регистрация: 11.04.2016 Сообщений: 34
	31.05.2016, 01:53	2
	1. Сообщения типа "Переменная А нигде не используется" - не ошибки, а предупреждения. На них нужно обращать внимание, но они не всегда означают, что код не работает. 2. Зачем ты просишь ввести координаты точек M и G? По условию задачи с клавиатуры вводятся только координаты точек A, B, C. M и G - видимо, должны рассчитываться на основе координат вершин. 3. Просто удали объявления переменных A, B, C, M, G - ты их действительно нигде не используешь и на работу программы они никак не влияют: ведь координаты точек ты сразу считываешь в переменные x, y. 0

Опции темы