Question

Выдает такую ошибку , в чем проблема?? source.pas(13,11) Fatal: Syntax error, ")" expected but "(" found Program P1; var a, b, c:integer; s, p:real; Begin write('введите координату a='); readln(a); write('введите координату b='); readln(b); write('введите координату c='); readln(c); P :=(a+b+c)/2; writeln('периметр треугольника =',P:2:2); s :=sqrt(p(p-a)*(p-b)*(p-c)); writeln('площадь треугольника =',s:2:2); end.

Answer 1

Ответ:

синтаксис у тебя не верний

Answer 2

Ваш код содержит несколько ошибок синтаксиса. Вот исправленный код:

pascalCopy code
Program P1;
var
  a, b, c: integer;
  s, p: real;

Begin
  write('введите координату a=');
  readln(a);
  write('введите координату b=');
  readln(b);
  write('введите координату c=');
  readln(c);

  P := (a + b + c) / 2;
  writeln('периметр треугольника =', P:2:2);

  s := sqrt(p * (p - a) * (p - b) * (p - c));  // Здесь исправлено умножение и операции с "p"
  writeln('площадь треугольника =', s:2:2);
end.

Изменения:

1. Заменено p(p-a) на p * (p - a) для правильного умножения.
2. Исправлены операции вычитания с "p" в вычислениях площади.

Теперь код должен компилироваться и выполняться без ошибок.