Помогите найти синтаксическую ошибку Pascal - есть ответ

SlavaKnyazev, 228 просмотров

-1

Задание: Найти площадь треугольника по формуле Герона
Вот сама программа:
program Geron
var (a,b,c,p,S):real;
begin
write ('Введите значения длин сторон треугольника');
read (a,b,c);
p:=(a+b+c)/2;
S:=sqrt(p+(p-a)(p-b)(p-c));
write ('S', S:8:2);
readln
end.

Вот ошибка при запуске: Geron.pas(2,1) Fatal: Syntax error, ";" expected but "VAR" found

Ответы:

SnaF

program Geron; {точку с запятой забыл}
var a,b,c,p,S:real; { ну скобки то зачем ? }
begin
write ('Введите значения длин сторон треугольника');
read (a,b,c);
p:=(a+b+c)/2;
S:=sqrt(p+(p-a)*(p-b)*(p-c)); {забыл знак * это тебе не математика }
write ('S', S:8:2);
readln
end.

12 лет назад

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.