Категория - Информатика Автор - jiker99586 6 лет назад НАЙДИТЕ ОШИБКУ В ПРОГРАММЕ, СРОЧНО! program WASD; var AB,BC,AC,x1,x2,x3,y1,y2,y3,S,P:real; begin writeln('ВВЕДИТЕ ВЕРШИНУ A'); readln(x1,y1); writeln('Введите вершину B'); readln(x2,y2); writeln('Введите вершину C'); readln(x3,y3); AB:=sqrt(sqr(x2-x1)+sqr(y2-y1)); BC:=sqrt(sqr(x3-x2)+sqr(y3-y2)); AC:=sqrt(sqr(x3-x1)+sqr(y3-y1)); P:=(AB+BC+AC):2; S:=sqrt(P*(P-AB)*(P-BC)*(P-AC)); writeln('площадь',S); end.
Категория - Информатика Автор - jiker99586 6 лет назад НАЙДИТЕ ОШИБКУ В ПРОГРАММЕ, СРОЧНО! program WASD; var AB,BC,AC,x1,x2,x3,y1,y2,y3,S,P:real; begin writeln('ВВЕДИТЕ ВЕРШИНУ A'); readln(x1,y1); writeln('Введите вершину B'); readln(x2,y2); writeln('Введите вершину C'); readln(x3,y3); AB:=sqrt(sqr(x2-x1)+sqr(y2-y1)); BC:=sqrt(sqr(x3-x2)+sqr(y3-y2)); AC:=sqrt(sqr(x3-x1)+sqr(y3-y1)); P:=(AB+BC+AC):2; S:=sqrt(P*(P-AB)*(P-BC)*(P-AC)); writeln('площадь',S); end.
Ответ Автор - FRBI Оператором деления, вообще-то, является "/", а не ":". Там стоило написать P := (AB + BC + AC) / 2; А еще в Паскале вывод вещественных чисел стоит делать по типу S:2:3, результат покрасивее будет