Выдает такую ошибку , в чем проблема?? source.pas(13,11) Fatal: Syntax error, ) expected but ( found - id1382065520230607 от tata479 07.06.2023 23:58

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.

tata479 · Accepted Answer

Rem BASIC-256 cls errors = 0 print Введите текст ; rem Пользователь вводит текст input a$ rem Перебираем все буквы с начала и до предпоследней for i=1 to length(a$)-1 rem Если встречаем букву Ч или Щ if mid(a$, i, 1) = ч or mid(a$, i, 1) = щ then rem Тогда проверяем следующую за ней букву. rem Если это буква я, тогда подсчитываем очередную ошибку if mid(a$, i + 1, 1) = я then errors = errors + 1 end if rem Переходим к следующей букве next i rem Вывод результата print Количество ошибок в тексте ;...

MOGZ ответил